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J^l J^oill 



oUjUl (Ik (V 1.1 
. f U J^ju 1.11 

jjJUI dWjt j^t v^ Nl ioUl Jijisiill oJLa. Jp J-^ Ot £c~S fiAt^M «*kM» 

^ilyj i pi^S jJl oU-kJl aLJL. J£il .JLtj . o"^ 1 Uiil i^ > i^j 
.J* : ob>ll cSj- LL* gJI«* ^ ol^yJl ,>« 4U . oL.a^-lj ol^>dl t >\£\ j» 

4,...k; ^ 4 VjP 0**Jlj O.y.J-1 O^UJI 4 ** 4 ilj^JJ ML- ^U-l »/» 

tfyj] f Is jJI ^ : y^Ms (^^U^ «-»i-=M c^ 1 a* 1 «■ J 5 * J t, -» Ul f UiJI ^ 
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gld'ill 4*f4 1.12 

oU-yu tS^ t oljlki "^ ^ . l^-V jiLti ^]| i.ui| ^l j^l, j^ ^j^ 
y„X, t ^:>l>l J^. ^U^l Jp ^ c o«Sl;j jo* 1 — tpfc ' i3>^ I**! JjJ M-L 

t olilll ^JiJj SjIjJ t ^H; ^j ^ut j«- i jjUJLl Sjbl c iJjf il r ^ 4 JaJaii, 

. »Jl . . . ijlA-l oL*»U-l ,.Jv.t 
J OiAt^ll oU-^j^ *Ai» t JU^Ml JlSLit £^ Oi; ^j^- i£>-t ^U **&f 4l> 

i>' M-y. ^ «■ *^' •-** Jj-A; • ^L.JjJ.1 fit; J « ii^»JLI « p^y* r&^i 4 IJA. 

. iJbt J&J ^ .Jb-j ^bNl ^Jj . ,,.k-.; 

- ojl^lj *Jadl i**. 1.13 

. £-")ktU olkLii-'Vl jUlpjj t \. a* .All J»Ul i_il£Sj icJlUj Ajiljl.1 »JL* 4->."~.;j 

^- (. ( tViitripi-ic >5jll j»J jiix* ) JiiL*- J5Lij iiA.JjJ.1 jjJU t *JUM bJl*. j 

(J-t- 3^>yj »j j^j . /jjj^-ill oL^Vj JlJ&JI tUaPI i_ihjt ^ JLn.^T ^^i . (jA—JI ,j~&£- 

ilL- t oUyjJLI i-*S i JwJl pij i ^ Ji»o jfrZ cjUJlI j^^>- : V^' u**i tl ^l 

■^l*- ij J>^ <jt til *^l»«i ■-..■■■■ ; l 4P^*>J.I CiUjldll . «Jl 1 oUJil AjjjjJ t A^j-iJl iiijs^ 

. f->Ul ixj^j •>»'W- 4 L j*« ^li iil* Jj5i ot i_-^ Ir^Jj 4 i»-Jl 

July Uulj i J/;>Jl y^ 4 JL.jJ-1 yu- 4 O^JUll v' 1 ^ 1 »y 5il *»y" Icf i>& •*» l 'M 
/.lijlS l^b J^Jb" "V oU^lidl .1* a^ . jJl 4 fcjJLI v«LJl _ ^U^-Nl ilU-l 4 -tu^JI 

. Jjjtll 4jwIj ijp 4 Sif- "^ J U^T^J 
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*JU J oL.>ll flkl Oyjs^l uf-4^ 0d» fry. ( ER - Alexander) ^fc-fll J»k* 

; iUtfjj* oUjJUll {.UaSjIij **4-j4fa 4 il^Jlilp J oU *V ill>- Jj 

li» J . ^1 J JU-jJl SjJUaJI Jb'tf dU- Uj ^ ^ 4 c-jdl SJi-»J ^r 1 ^ l** oI * 

. isLSJlJjlSjWII 
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0j& Of i_~»Hl -j-j t j<a£j JUfcl oULS^ 1 * ' ^ •>*■* Jr^ 1 L,a:p u^J 
SjrtkJl Jtfli aJU- ^ <u» : iJlS - J^Sjj i c^-H ' **r-i d$ l ^>^» J^ ^*Lcu~^ 
ouu . l^m Jv 1 ti v- 1 ^ 1 j-itsii *H»- J **rJi *^~ </" ^ i Jjj' ^ i>* VO**^ 

J t LJUii lij t jt t lp)\ J 1^ ^Nl J 01 4 Jlii ol^U. f UiJ OUks 0U1U-I 

Of iiUi ,_jw 4 JUO^dLjj . JULVJI ^U^.-3-j O^j^ 1 J**" v-jj Jj»- ollw-'iHl 
Jp Sjk^Jl j U.UJI jl^l SjU ^ *ilj i OlS^I l_™p- UL^l ^ .Jul. ^JJI oL^I 
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olyLdl f l& i^ 1.2 

i uljjjJl tfy- ,>£_*» : lj~S oLS'ji 5WB Jl f—S^ o? ±fe flkll li» . *Sij>ci 

. oUjUl ,yj^ 4*1,41 Jj *JLUllj 

«_o»j; i J jj& Jlj^— J Jkp : l^-v*f cAijULl ^Ls iJU* Mis ^ <JL» 01 jj jJI 
IJU «. ^Jijdl I .i* ^ iJfe*Yi -j- a^ Jjf ^t- Ut* f ju; ^f Jl jjliNi ,y ika; 

. i^UI tiUy^f j^wst JjU ^Iii . p foil JJtiJ Jt-Vl ik-yi *-* j* .-Wb^Vl 
•jS^' fc£.^l .i* . 4J gJuL ^JLII 01511 Jl a, \f&j OllC ,y \->[ cMy\A\ JiS 

jt iUSc. 0^; jf t ^jstf oLyL« ^ 0jL£ Of jSCcj ^ . iMA\ ,y (j-j ^* I JL»j 
■jlCr, 4 0L>-Vl J-^if Jj . £il i iU>\kj> t £*i\ J> t 0ji>i 0t ■jSLe |^ t ojS'ji 

<&>ry 7*r^" ^ <■ <4"UW jSJ« i5jS—» j J^J' j J»s*«; Js*-^ li^ - J* 5 ^ *^' 
•U-SjJl •>• : JiLJl J Ijsjij Lajf 0j5L U 5alpy> J£iJl J J--dl IJLa . LU-b 
Jl *b^S3l ,y 4 .bjifll J ^1 ,y t £*-!! Jl Jjjikll ,y * -Itrffll Jl 

i i^Ull VL>1JI JSI^JI JlSLsf^-JbjJ i UifilL* . ^jidJJaSL-,JpoLyl*. f Ui; 
l)^3J-I JJ (Chromosomes) 4Ju*o)l Lts^-I Jl d&oxyribo nudeique j*a*U-l *i J L»J : r (>*■ 

. yt[ Jl cJj j* fj")Ul 0^1 *^1 v^ vi -s»" l ^Js* 31 ^j*-' ol «-i ^1 '^J^ ->-V. 

. 4Uk* iijix-. JUJil L5 ^]i jjlaJl 'j* 
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gb"fl ^ 2.11 

«M~ J tfjfll cAfi\ lrjS3 aj-i IJ^s t i-M ,>• ^ ^ J W** 11 ^ IS 1 
UiJf J Ji. ibL* J-IS31 UI.U Jb£ ^i . l^U-^l OUVl ^ku-i "V tpll oU>ll 
Otf U JS3 *--& UpU v-A-^JJ 3bl VjS if-Mj . oL-fcdl ^ xridly «. c*U>U 
^ gjJl Ijl* tj JiJudJ iLUJl^ji y>~Ul iwJf ^ Of v£ *» ' J?» 0* '*>"J* 

ji- SJUjUl clu UU-j . 80% Jl 70% ,>. oU-kJI S jbl v**^" ^ ■ vW* 11 

«. j^cU^U^dcjbgbsHiJjiu^ * JSJ» jkiy . oU-U-l ^ LSL-^I 
.!» jj . ^1 UUl ^ v*fcdlj ijJbll oW^I .-A-r-b s >r- 11 1* ■»« u$! J 1965 

^\j JSLbj OjU-s-. ijjJUJK)U t 1955- 60 Jby i 5JJLI u* ^ *:f j4idl ._-£ 

01 Uj o> Of v*r &j . v 1 -^ 1 «j'rr**3 tS SjSJ^Vl oUU-l >JJ Lj** if OjOij 

jjjb« ttJi OjSS of <-£ ^j jj| «jj ; SjjLJJ oUwll J*» j 0j£ i gte^l J 
oULLL, UU-\ dUi ^ gbfll i-A-)l« . SjjJiU JL-Jl, vlLJ JS i Ljs JUs-JI 
^Jl i ijUdl JU*Vl Ujf ^ t UJLi. UIp j^Jj i 5-SL-^ o*»— * *l~L-xU 
^ alv-1 » «-U V-^ * OjjiJLI Sjbi : ojUjLU f It: ,>- ijJU 4»j^ l,^ ^ <-— ^ 

jUiU ps d^» i bjtijtJf o^j of j&.j&j ■ $ » oUyoii t ^ju^i orju-J 

J SsJ-kJl JU*V» o- 5^JI 1JUL sLsJll t (COBOL) JjyJ iJjt v"l">- Ui' ^ 

li* J!A>. if ^Jl oUJj SiU ^ J^.U-1 j^II jjkJl o- pPj*. Jcili iUoJit j c 1959 i- 

oii. j\ i. oi^ t oijjyi^ u* Ji Jl-jL, >; > i-p« gursw yuji^ . o^aji 
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Jp 0l£- j^ t ^Vl oLLJ-l .jy*. ^ aJ>I cW-J-I Jb-f aJU t allj ili^JLj 

. jJl t JUJb 

SjlaVlj- 2.12 
/U ^ . >l>«ll ^1 oli, i^jyi t i^, j^U-i c,U«ll Jj*. ^ Sjl^l 
"y^Jl ^-l~ l^J . '^j jiP i^ «iaJI jIjpVi ,11* <a js\ ( ftlb % ) iydi iiapVl 

OjJC Ob *S* J^lu oU>dl fli ts-Ul f lkJl ^ U.F >=J . jl^dl J:**. L£? OlS 

* uij^ll i-Jt J^ Ibi r _ jseiij .UtfsU aLUJI oLSL^-NI : ijl^l oW*. J* ^ 
villi J_L* V Uup 4 5.1^1 i-wJl tff c 4*»LUl Jp SlSUll fJul J\j t i^fli 0^ U Up 

J ^jU i^wy UAu"^ ^ 4^U,LLl <*Jijf Jjl4 J.iLjo-it UL.jLdi ol>>f 
^y t J^LS i_JJ, J_p v ^ of v^ l^V . C L5VI J i^iil Jib ^ t J_«J| 

• oiJ>l i5j^- Jl -A*-*' Of v* oU>dl -j- ^f t f U. JSlii t f "uf J^ ^ : ^yiy 

i Vu^Jj ijjj^; <V>a> r lff i»Jl oIjjVI t fjJil oJjJl t oUaJll il^, i>ULl 

J>^" j*iy * S^4- 5^1 V"Wl« J5U ^ Sjl4 iA*>»- "1-^1 J1J-* L. Ulfcj 

. ^kdl j olyLdl JL. 

.0* Olj>> cJtf i oU^U. f VkJ ^>^J| ^j&S oLSjil Of bfj oi) 
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jj^S gj-Z Jl oU^kJl oU>- SJiJt j iWaJl JjMl ol.>ll SJiit oat aalj 

j, c 0>i-l JSL-jj ijS>l olJ^Jl l-fjJ>&J V-^ ' U* ^"^ ■** <^ I 1 "^ 
: sjUjUI oljb J/JJL i>br Sltf cJtf 5,4111 a^JI . cM>-b V->^ *M 
! iUxUl ^pjl^-IS^I J i-ASll «lioting» oIp^I f l^t £'■& H V'W 1 * 11 J ^-r* 4 

jl j^jJl - 2.2.1 

Lye pJidl JLouj . Up SJ^L" iSLi &-!_* 'Ay*y ^ Ot ^ v*M •** • -* 1 " 
^UJ LIIpj . ijbNl J u-Wl ^ fr >•* fJicJ t o!>U-Jl ,>• "=-b ^^^ t> 

. ^ ^Jlj Jl Lib ^>- jJlo^-Jl^ j VfW)» 

^^ J J^Jl i-ldl i^l U : c« i ^tk^Ml jUi^U^ Cj- J> ! -r*^' ^> ! 
. a^U.1 ^U.1 Jl iiUl t ol>S y i ii> ^J 3 ' l ( '-^ 

J Oljj^ll fJ fu ^. re ^ ^» u^t 11 • ; VJI oNU:>l J aJ^I oU^L 

. oLajlxil A*liJI 

U-Ul - 2.22 
(Jl* 3>w tjb U -^ Ujkj . i^.li-1 jt oUJl ijJJU ola»jM Ja»- ^ ^Ul 
Jl j-jLJl ol^iJ L-t . ^L^JJ cJc&> tf> ij-f ^^ cA-j-U-l JjLi . v'^^ 1 

hySj.\ ol^l uy il/i. *^i ^t Jbrj, ^i . i-o- j>Jl ^t J2J-I li* Jj 

i Jit S> ^ ,yj ^ 6*j . I960 i- J fajv CJIS ^11 ola^ll ^lb c- SJU-I 

15 Jb Saj^. cJtf ^M *ilkJ J.IS31 ibl*. 4 jSUl Uai ,^»u * ijJw. S^j* Ol0>-j 
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Jlj^-l iJ^l & OVl &. ^s* Jij; Vj . Lj jiJi, j^ ^^ ^ ^j^ -^ 

lif ii-Ul ^j^I t ^1 J tki iJU J iij. t ^ ^ : j* oVl ^ ^ ^ JUa 
hysj.\ ola^l v_J*ti . olijVl & oij ^f J vV-U fc>* tij^. J^St j J^l j: 
. V U-I tUp J iU£Jl Ijrjoa, <L»cu- j^j i^tfls iyb ^ oU-fcsJl jjl^l J iLwo-il 
\jiS Oj>l J» i i^Jl oUJ -b j»JI,j t JUx^^l g»L. 01 Lit J**-^U Of «-£ 

. oVU-l t-jpl j i_itf y* ijJJl ,OA OL W^a; <Aj^ Ot *_-£, 4 iilJl .j* j^Ji 

^Jl t FORTRAN ^JLJI ift^Jl iiL jlo L. JS J oUb-!)Ul ^ p£ Of U*lk-L, 

. t- 27 Jlj?- OVl jp- ^*JI ,yi £JLJ 

Oji-I.2.23 
* » • ■ 

j-^ 0^ i 1 ^>j • «i>vi ^"WW J>as ^ JJ 0- *v«- •/■ a>J ils ^ 

«a>-jJl ya-ljj s^iL. L$ilj oU-Jl oljLL. JaU; 0j>- a*- Jl iyy J*»i Of c 0^1 
•i» £*• j oLtjLdl £jJL SO. . SJbJb- JS!jJ t^ji iil*l_jf >^£j *% Ot 0j>» 1. ijS^ll 

. ^jljilb s ^ ija^j^i Jif ^ JiljJl 

. Jb-lj JiU J* oU-Jl y ijLJU 500 j>- ^jj£ Jp t iJUJ^- 

vi»Uj*>II Oli * oLkdl »JyJ i-JU ^j t oVU-l «i* t| ,^SJj . U>- Sj„i» o*5l>-. 
. ijJ^ai\ oU-U-l UU v_-JUfi JbLl 01 £* t JiJUdJ 4LU jjp „* SjaSJl ^UjLiU 

Outrages de base : 
J. ARSAC La science informalique. Dunod (Paris. 1970). 
R. MORUAU. Ahtsi nuquii rinfornuiiique. Dunod (Paris. 1982). 
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P. TABATON1 et P. JARNIOU, Les systemes de gestion. politique* et 
structures. Presses Universitaires de- France (Paris, 1975). 

On pourra aussi consulter : 
Ch. BERTHET et W. MERCOUROFF. La gestion informatique. Presses 
Universitaires de France, coll. Que Sais-je (Paris, nouvelle cd. 1982). 

F. GALLOUEDEC-GENUYS et P. LEMOINE (sous la direction de), 
Les enjeux culturels de Vinformatisation (en particulier le chapitre 
asur I 'analyse des systemes » par M. P. SCHUTZENBERGERX 
Coll. inrormatisation et societe, La Documentation Francaise 
(Paris, 1980). 

J.-L. LE MOIGNE Les systemes d'information dims les organisations. 
Presses Universitaires de France (Paris, 1973). 

On pourra enfin se reporter utilement a : 
L. GALLET, V anglais pour informaticien, Cedic-Nalhan (Paris, nouvelle 
fed. 1983). 
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tjUJlJ „nft)l 



p-iJ . r Ull *>j4 ' o-^* 4A **^ f u >" U* ^.r^ l»* ( Word ) i * Jls::J, 
^1,^-* i iibiJ.lo , 5LSltdl | >.2cy»3Jlp Jp ^4 Of *J£Jl .JLl ,;/£*-» i ( i*KJl 

J>. UbJ bap Jb4d . VL^l JtS^fl olUM ,>*, oljff Jwj 1 JjJbLl 

. (n = 9U) : n 

1110 110 

ii 2 »_. JUS *ij J5 t-j^aj . *JtJl iwj^LJl ^i i ^y^jJl J-UJl j l^J iJycJ 
. _^aJI '^ IftJU J^l «m i jLJl j»J oI^Kjj ui^Jl j» ••AJIj c jjidl ^JliJl n*j>\ *J/" c** 

ooiiioi 10: axJI 

2 8 2 7 2* 2 s 2 4 2 3 2* 2 1 2° : _j VJ^** 
+0 +2 6 +2 5 +2 4 +0 +2 2 + 2'+0 =118. : ^l«« 
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. oU-Jlj oUKIl 


: ili-f 


4^11 


oUKJIJ> 


ol«..»H Jjt 


US 


IBM 370 ct 303 X 


32 bits 


8 bits 


4 


H.-B. 6000 cl DPS 8 


36 bits 


6 et 9 bits 


6et 4 


UNIVAC 1108/10 


36 bits 


6 bits 


6 


CDC CYBER 70 


60 bits 


6 bits 


10 


CH MITRA 15 


16 bits 


8 bits 


2 


DIGITAL PDP 11 


16 bits 


8 bits 


2 


DIGITAL VAX 


32 bits 


8 bits 


4 


DIGITAL PDP 10 


36 bits 


7 bits 


5 


BURROUGHS 7800 


48 bits 


8 bits 


6(*) 


Micro-ordinateurs 


8 bits 


8 bits 


1 




ou 16 bits 


• 8 bits 


2 



• 2n ~ * L?* l o^ "^ o^ 1 ^rf 1 *:^ 1 i5>oaJI i^l t n 
tfl ) 32767 4-*£JI jjr ^ t 1 wil^b^OjSiL.Jl^.j t ott^US t "Jli, 
: V" J* iJ ^Y 1 a >W d{ ^ J - i 4 ^ $ V-^ 1 Cr* * ^ i5>- lA . ( 2 is - 1 



SjUiy 



li£* : 1*1* ( flijVl ,y u JjUj jJLp _,f ) SjLil a Jp ^^ a SJL*li ^^dl ^ Ik 
f Ui_UJ 10 t (7, 6, 5, 4, 3, 2, 1, 0) ^Uift f lkJJ a = 8 . ( 1 j\ ) Jblll f lkU 2 ,> 
F, R , D, C. B, A, Jl ) gjtfi iy .iU\ flkJJ 16 t ( 9 Jl j* \ flijl i^l ) ^^\ 

.jJU<9 
(.ItJ J ( ,Jjn l y^^.iUK l jj i jt-Jl^H l j l jy%J| ( y i n-1 JJ0 j»{\3/i\ jIJO* 
Ifcl* J-a>J M* JS" i*Jii i ( i = 0, l..., n - 1 ) i ^jiJil ji *5jJl Ci w «— 5j i a oOP-li 

N = c «° + c,a' + ••■ + c,a' + •■• + c H _, a"" 1 . 



. vilto 6 JA OU— 8 Ufljl jl (*) 
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. olj-u sjLsy ^ ^ ^> ^ ^ 0jJi * S * WI «>* r- 5 c* cr^ c^- - 
. o Isb j» J^i -ijii ^ * ytdi f«j* u- ^-^ o* l tes y^Y 1 ^ 

■ ' " : *U 

5j3Ui^JJJ 0000 0101 

44 Jibuti 0010 U00 

Uabu^JJl 0000 0001 

^UIO Jibuti 0000 0000 

. 1 yb y. J/A ^1 vi-P- i WbsH flSjVl o* iLJL- ^ ijU ^ ,>JI *A*3I 

: *L.t 

-iiW»,$JUI 1111 " ll 

-lMjiLutfJM 1000 0000 

£j|-4,-U«^i)! I"! ll0 ° 

. SjSI JJt «jil ( *«Ja* ) «Listing» 
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J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„l.' 1 1. 1 l .l .lll .'.l., i|. '. II l.l.Tl 



V^l oUa*il _ 3 

i.JULl ijbUi us^Ji oLLdl _3.1 
obUL oUSllj 303 iLJL. IBM fc£. 3.11 

. i-^u.i 4JU-1 j 1 1 Li^i y. j juJi ois - 

- 32768 Jl + 32767 ,>. : ii 16 
. - 2147483648 JJ + 2147483647 & : o 32 

DPS 8j 6000 UJL. J j, Jjjy> _ 3.12 
. |2 Jl. ^IsiijiUidl Jj t o72jf36 i 18 JS ^ J^l 

- 131072 Jl + 131071 ,y : o 18 

( # 3.4360.10 10 ) - 2 35 - 1 -^ : o 36 

( # 2.3612.10 21 ) - 2 71 Jl + 2 71 - 1 & : i, 72 

1108- 1110 JUL. illiJji . 3.13 

. o^uf jl^iij j^ jjjy* j j^jcJi j^l ^y jj^i 

Cyber 70 JUL. Control Data tf^i _ 3.14 

. ( U^>l Sjj^li >;f ) 2 Ji ^ Jj t 06OJ JjuJI^. 

( 6,764.1017 L>- JsUl 2 5<J ) - 2 59 Jl 2 5g - 1 ^ : o 60 

I 59 

h p 



? 



59 

SKiNIi SjLiJ 



^ * 



Xj*z* iULi, JjUaJl - 3.2 

fcjUL oU&lj 303 X JUL. IBM > 3.21 

I2K ) £_!^l jt t ( o 64 ) Je>Jl 1 ( o 32 ) ^wwll JSLtJb jJbJl jic 

^J^ >f • ( «! 



1 8 31 
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J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„l.' 1 1. 1 l .l .lll .'.l., i|. '. II l.l.Tl 



JtAJ&> 



K 



I 



St**'* 
« 



3 

63 



| s | ^ | *M\ tfldfe ,frA«B »# J 



1 



63 




^pJlI tfjjj|_ j» tj.A 11 ^' ^ 



127 



UUU 1 i u^^J : (mantisse) 6j£^\ >£\ "*P\ J-^ d^ 1 ^ 
i.JaS'j 4 i^SlI isUl V* ^ * (exposant) ^1 iJUl ob 4*~JI J-i* 

(1 - 16" 6 ) 16" Jl 16"" u*--** 3 *^ 
(1 - 16- J4 ) 16" Jl 16"" ^ : k-J* (J 5 ^ 

(i - 16- 28 ) 16" Jl 16"" a- : £»y J 5 ^ 
. ( 7,2.1<) 75 tbUS 16 63 j c 5.4.10- 7 " JaUl 16- 65 ) 
DPS 8 j 6000 JLJU J* J jJj* - 3.22 
.( «• 72 ) Ji> J^ij ( o 36 )j^i JS^i ^rji 



1 7 8 9 35 

|sl pA jS| cl^^ 1 



-M- 



1 



7 8 9 



71 



M tgr^ -'fr 1 



^1 ^ i5^l ^M-> * 2 Jl ^Idl J c ^1 ^ JjVl oU. oUiJl 
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J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„l.' 1 1. 1 l .l .lll .'.l., i|. '. II l.l.Tl 



oU—jdl Ja^ JbJl J, JUM 



JjLiNl 



ik— j Hi 



"ji 



**-j*y U3 



W '" <(l-2-")2'" «(l-2-«)2 1 " 



c*L- 



-(I +2"") 2 



26\ -j-129 



N» -2* 



-(1 + 2-«)2 



62\ -J-1I9 



> N > - 2 1 



SjiU. 6,0, - ■ < (1 - 2"") 2 1 " < (1 - 2"") 2 127 

S?^ - -2-» H >N>-2 1 " -2-" 1 >N> -2 l " 



I 



8 V 



1108- 1110 31...1... iJUjjj _ 3.23 

35 



i^r^' 



H 



JQ-308 
| 3O8 



Jl io- 38 ^^wtfJS^i 
Ji 10" <yji>j£i 



Cyber 70 iLJL- Control Data fc£. - 3.24 

ij 120 -j* Jijbj i io 60 -yi jjvai : (jjl£»i Uit Jb»-jj 



(I I 



7 



II 12 

Id 



59 



iSj^-^JT 



4« 



»J^ 





(1 1 




II 12 




59 




ft 


J 


1 


gjZe- *y? 


I 




() 1 




II 12 




59 


n 1 


<% 




1 


M> 


1 



SjUtj 



: g*j> 

(aJMo.^29) io«" Jl io-"' ^ : J,>J£s 
20 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„l.' 1 1. 1 l .l .lll .'.l., i|. '. II l.l.Tl 



jbUlj ol^Llj 303 X &JL. IBM - 3.31 
oL ikJ^. EBCDIC fij\ J-ic 



I 1 1000001 i 11000010 i 11000011 i 11000100 i 01000000 i III 101 1 1 i 
A B C D b 7 



DPS 8 j 6000 JUL. J j> J jJjA - 3.32 
.w-^-j lii ilU* . ob 9 iko-ljj ASCII jf ob 6 ik-l^ BCD ^1 J-i£ 

. <J53l J oL» 4 jt i*Kll J oL- 6 i c/bfU-l 

Cyber 70 JUL. Controlc data - 3.33 

<. JLyScJl J,Ji>. _,&[ ) . U£)l J -ISjf 10 \'z[ iib* . ob 6 J J-IUJI j*i 

. ( B2 J»JUl 

. jUall JbiJI ^ iujj"l oLUll Jjtx J juliS JSVl AijUlj . J/IJJI <*~- 

ujLkll ^^SaJI - 3.4 

«iL oUSOlI. 303 X aJUL. IBM - 3.41 

•» ♦• » 

ojU^I J_Lc ( (5^ ^-oL*. ) «D» i-ijJ-lj t + SjLi^l JJLc ( gJ^^ ^U ) 

•(- 
R I D I D I ;! I P I D 1 P i si 



D 



i-8 bits- 



-8 bits- 



6000 UJL. J^; JjJy» _ 3.42 
. U£JI J (.Ujf 9 lil be . BCD JO .jScJI J ob buj J ^j JS" jir 
«A» -yij t S_JLJl SjLi^U ( gjJu* ,^-jI— . ) «D» ^ ojLi'yi J_* oliLil^lj 
«jLl!)U ( i^^iA ^jL. ) «D» Ijip L. ( c-^i* o^ ^"* ) *^* <il ( cSj^* (_r°^ ) 

obUl oUS^j t 303 X UJL, IBM - 4.1 
J *w JS J,ic j»i t ( ASCII j oU-Vl ^ Jj ) EBCDIC JbjScJI J 
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J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



bl 



DPS 8j 6000 aUL- J jt J jjyi _ 4.2 
9 J ASCII ij_$J| J _,f 0U4 6 Jj BCD a^fll y^l^ ^ J_JuJ| 

. ( 66 iJLJL. ) ASCII J0j£Jl ^ju Jja oU^fl of 

Cyber JUL. Control Data - 4.3 

4 -bj&ll Jj a^ Juf ) JLJ53I J oL- 10 lil U . ob 6 J JjUill ^ 

. (B2j*JU 



1) 5ff 1112 17182324 2 930 3536 4142 4748 53.54 59 



a* 



"s 



"6 1 "7 



"8 



fl 9 



£fcUll 4-^L^ J JJJU.5 

Jl l$*-*r ij J^ ,, **yj>y SOU* o> ^* . u^JI '~A"- sL| J ^"^ ! J , - S ^ 1 

: i^>^ gib ^b ^Ut. N ( ^jjljiLl ^1 Jj ) g*kj\i 1 dllJJ ^Ul 
i-«^ljll i±«?- 4j^ oljb ik-ljij JLio 4 t_w.U-l J J»jJl J -bwij JU*i 1 I i£» 
J^l j^-b • ( arrondir jj^SoJl ) jjjjJl *>^ ft Ua>-f l^ *£ J&j 1 jjU JjL ^ 

. (JjSJJI j*><JJ isjj& i£y-» ,►«<*) 
,jJlj 1 *S j>cl> SJUtflij "*ijM oljlJJl Jt ^jU-l ^jLJ-L L^'b ctlli J-Lcj 
yk tki-l I j/t 01 djJLt Jlij . J»*jHpL a!»jjj* t_~-U-l ili^ljj i«JULo i^j.^f Lgj OjSi 

. igKA OjJj ijlfdl 4>**£j| 7WIJ <-i-**«J IJsj- j*^" 

: (*) ( oljij^Jl J ) *, 
REAL X, Y, ZA, ZB 
X =• 1-0 E +09 
Y - 1.0 E -07 
ZA - (X + Y - X) / Y 
ZB « (X - X + Y) / Y 



«Mjb \ji 15 J^o Kj*^. *UU» jJLl d~>- i£. JUjo-I b» .j^/i (*) 
22 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



ZB = lj(.klp)ZA = J^ jfjf . ZB = l J ZA = l^l5jUv^ 1 J i, <>' 
J ^ c =5 [S\> J*~ (X + Y) JjVl iJuJl <. ZA uU- Jj t li£* . ( £>~" ) 

■ iW M" f^ 1 J-^ C 4 X 

J lAjL^b J^'J j^J-^ 1 J-* 1 *^ J-a^ ^ SJ - P ^^ °^ ^ 
jj^j i (Wilkinson) dj~&y ii>. ^ i---L-Ml i3>-Jl (*** a* • ^LJ-' 
. Vignesetlaporte £Lp> o*+%j <• (Kulish) JS-LS' )j (Moore) 

J \£j>c* ii^U. jJLl /jp i^Ul j^l &b±\ £-jy jL^^ ^4^y^ r^. - 
. JJ-I lJUb J AiJJl j>JJuj j>- lit £jl> i£j£ I*** ^.jlj^ 1 oLLJl ^ - 

. ^uji j j^jVi s>=i-i juaij v-y^ 1 i3>Ji J v 1 -^ 1 J ^' r^" - 

Of ait W** JSt jjScu- ^SUJI .i*j . i£ll il^-l^ k^l ^'bJl V-^Uoi JJ-dl 
iL£, U jc^-J t iji JSf oL-L>- jjJl j U ^j^- WjJ.^ 1 J Ji^ 1 

" . c/tfU-l ^ 
: OUI <^£M i*^ Uuf -jSUil ^y 
G. G. BOULAYE, Lfl microprogrammation, Dunocl (1971). 
G. BAZERQUE ct C TRULLEN, Informatique generate, Dunod (1971). 

W. MERCOUROFF, /« ordinateurs, structure el fonctiannemcnt des 

systemes informatiques, Ccdic-Nathan (1980). 
CROCUS (Nom collectil), Systemes a" exploitation des ordinateurs, 

Dunod (1975). 

Sur le controls de validite des logiciels numeriques : 
J. H. WILKINSON, Rounding -errors in algebraic processes. Prentice 
Hall, 1963. 
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J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



J VIGNES, M. LA PORTE, Error analysis in computing, Proa IFIP 

Congress Stockholm 74, North Holland 1974. 
J. VIGNES, New methods for evaluating the validity of the results of 

mathematical computations, Math. Comp. SimuL, XX, 4, pp. 227- 

249, 1978. 
J. VIGNES, Une methode pratique ejficacc pour evaluer la precision des 

resultats des algorithmes numeriques, Colloque AFCET de mars 1982 : 

Lcs mathcmaliques de Pinformalique. (Conference invitee.) 

M. LA PORTE, J. VIGNES, Algorithmes numeriques, analyse et mise en 

oeuvre, Tome 1 : arithmetique des ordinateurs et systemes lineaires, 

Technip (Paris, 1974). 
J VIGNES, R. ALT, M. PICHAT, Algorithmes numiriques, analyse et 

mise en oeuvre. Tome 2 : Equations et systemes nan lineaires, Technip 

(Paris, 1980). 
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J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



dJLJJl J-^H 



c Sub* «JU>U J Nl utf je* > J^ — M p* ■ 4-^» UW ,S 1 ' <^ 

y> ,/***» j^ln u» . ( ■ • c? ' or^* ^ 4 oUlM °* ^ J } ^ 

. ^ ilU-j 4SLHI «U uy ,Jbj ^ $** VM ^ ^ ^ ^ <■**"* 
iL^l, * fibL-H. M^' ^^ u* ^^^ ^ ^ U ' aXJl 

^u^Ji j» . 4. ttULi (close) s&y J &J-j * ( OPEN > tf*" ^ ^ 

NOM ■ 'MARTIN' . 

^*th jly ^^j - 2,]l 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



Cy Jc* 3 -^ if- »jLp ^j . t*>Ljj < . J J J _S' -iwU- -j* i (H. Holoreith) cJjjJy> 
/ 100 Jl^ J^U; tfU-j t jJU 82,5 ^jtj 4 ^JL. 187 J>, j j^Jl ^Li>. tiyj&\ 
. ix>-\j iw J*4 jf j^U J5 £k~i . L^U 80 j Ijk- 12 Jl iJLii i jJL. 7 

4,,,..,Mall& r &yi_2.2 
4~-JpU» Sale Sliaiil 4 j^L. ityif -jp SjLp ^ ^JpLjJ.1 i_~-U-I ik,Jif 
12,7 J;\ t iv^jj 1/2 ,j^j*jj <Jj_^L« SOp SsliSoj t ^"-jy (hysterisis) tiki SjjJb 

AijlaJ lj t Oljlw iu-j Jp U|j CjIjLj 4a~- Jp U[ t [JSJj t J-Jt-J ^J . JL» 

J~*L~j)l & jl» - 2.21 

PE 4b>Jlj ( >vJl Jl Sjj-p ^ ) NRZ ii^kJI : J-^-dU 0bi> illi* 

. (Bit Per Inch) 800 BPI Jl l s y ^ii\ iJ>) I 4iliS3l J^al t NRZ ihJJ\ J 

^-bk&ll JajyiJl Sills' _ 2.22 
. ( 1 JSLi ) oljLw. 9 jf 7 Jpj i Jajj-lJl Jp.L^U oU^Ldl J^~J 



Piste 9 I 








1 








l 








1 


1 


, 


Piste 8 I 


1 


1 


1 





1 





1 








/ 




Piste 7 / 





1 


1 














1 


1 


1 




Piste 6 f 








1 

















1 


1 n 




Piste 5 I 











1 














1 


/ *■■ 




Piste 4 J 





1 


1 








1 


1 


1 





1 £2 




Piste 3 / 

















I 


1 


1 





\ 




Piste 2 \ 


1 


1 


1 


1 


1 


1 


1 


1 


1 


\ 




Piste 1 \ 


1 


1 


1 


1 


1 


1 


1 


1 





( 


■ 




! A 


' L * P ' H * A " 


■ 1 


: 2 


■ + 


' 








i 


u*J?lXl 


*a Jaj 


r*-' 


J^ 


1 











i '(imputcr Tulniliiling Recording : LSj-iS i_ jjUNI *J*M\ j \f—it- i)L5 OjIjjJj-* {yJ-» (*) 
-L. o?w>l \£ji& «JL» . (Wiilson) 6^-jIj 0j-»- j-Lyij (Flint) oiJi JjU £. i Compagnie 

. (International Busniss machine) IBM iSjJi i 1924 
Jlil *k-.l^ t ^iOJ-l ^JjJl j f* oU«ll ^j i-UJU . OVl olilkJl ,y UU* JiJI ^j*. aal (* *) 
. (time-sharing) J*Jl iu«o J ^j^oJJ jJi« JUjC-Ij g*I^JI >-& . *jjl» 
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J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



jJJUdl 5JL5 U- > ^ 9 ^ jULI . EBCDIC i^JI b> y> >j&\ 

u* jf 4 ^.j* js j aJLii oUJi jju, . vm g>Ji sus3i iii ^> 

. (bpi) Jifli j g>Ji otJi A** 4 *^i o-^ «il <P>- 

Inter record c/>U~Jl Oh y*=» <i~" DMS ) : ^ c/ ^J^ 1 c ■' Ul; * :!, 

■ ( Gap 



BPIjStefll oIjUlIaJp Js«— Jl ttj> J> 



556 7 NRZ 19 

800 7ou9 NRZ del5419 

1600 9 PE del04 16 

6 250 9 PE dcl0al6 



^1 ^JUl 4 ( 730m i/ ) (J* 2400 ^ A^/Jl U~. ^~>\>\ *)j&~ij \Z&"\> 

. 1.600 BPI Jljs- JjU 3l£ J i~ i jJU 46 js- tSjirf <^ 

Jl«il^PE^^&^ljSUjtf J~cu.J oL-U-IOtJl ifllj^ 

. oljL-.9jj6250BPI 

( oliljk-J ) W»kW u^ij»Vl- 2.3 
i_i*oj - 2.31 

,y v-tf ****** 0* *A* •>* ' J& «>* W^ 1 ( u^ 1 ) siA-^ 1 •- a fc 

•^ ^ast. a -LJj i^J>" * i^j iJ& ^LUff u* Jb* i fl<* J5^j 

j\ £.U jjSi 0l (disk-pack) cAljk«% oJA ^1 . disk-pack jt t oUI>-Vl 
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J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



Axe 




WJJJ 



(disk-pack) oUljk-Ml ^ J t jL- N -^ ie^l . ( jjjj Jul^k-Vlj 

^1/ ^J-SU J5 J iJljJa^f 8(K) Jlj^ iibb 0j& Of j^JLI y . (cylindre) 
. jj^OJ wJL yj| SbV UJb£ Idy MX) ,y JSf ^L" t -^ (disk-pack) 

liJ . aJU; ojiy? sbf itu-ijj ^LjuJi oiyi lii. -^ {ijj*i» sjlp jij?- j^Uj jip Jp 

r L ^j^lJl 4 yjj^W Lit . Wjk-Vl Olj jp is>j~, J SjJb iulyi 4xJaS JL>-jj 

^f iL>}±>- iJU J SjJiL. ^jjjJl *~^~j OU «34*-f JL>jj l_^JI liA . J-alSGL 

. J*3 JSLSj j^tlLj iljko.Vl *j3J Of JJ 4 fjJl IJLa J* 4jjl>- 
CjUJIXp-J j»ltj i_~~j>- ^ iljla^Vl {y> C/)L>*— Jl ^Ss-\ ~*vcAj» SJL* 0[ 

o Sa . Jvm 'J)j» J"*U- ja i^^J- jJl 4 i>-jj 360 Jl y 4 JLkiJl iijIjJl ^Ui 

oUljk-Vl ^Ijlt <^lsfc - 2.32 
•yi SjLp ^j 4 (Sector) <jj\jS\ ^UiiJl ^ ^Uljiu-Vl j ilu-Jl SJb-^Jl 
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J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



^ . ( Kcar/ S) Ubll J i^-^LJ 3000 ,y jtft ) JUjVI fej-; ji* L. JS 

. 5JU-I oL5jJl J ils VJi JjJJl a* 

iSlu^ ijSli j' (Card Random Access Memory) C.R. A.M JsLJl L» jSJUi 
OU-Vl v_Jpt J ^tl jJIj 1 iJUtaJ JtfVl JLXJlSlLl U-^Jj^Jl J 1 v-JW^ 
. ( «JI 4 NCR CRAM 653 t IBM 2321 t Ge MSU-388 ) SJU»- J»p *£&& 





Jil^Jl fjjit »_ikfc JP S^j» iuflj* - 1 lijJaf 




r-NI 


LsN-JjiSu 






fjLJlU* 


jyM , *^> 


VjS>!jSli 


M.O.S. 


**-. OjJLi M j»- 


_ 


!» lis 


ji>Jii 


oil Uljlul 


oIjLmJ^Ijm' 


>jU,5J|l 


OjJ-3 


10 + 20ns 


ii«*L>* 


'S^&f Sljla^l 


4$j»M* jygMl** 


ajtLsaojiioo^. 


OjjLil 


2(lnis Jlj». 


:^1U 


fej£ljk*«t 


JS^jjt jg^kbi^ 


OjgU 1 SJL»-j)ll 


1000 + sum 


100 + 300ms 


SywtLji 


iU^il 


4$j*£A ^LmmPLJi* 


i250BPI,y4ittf 


mm^- 


Jf»»U 


^lyJb 


wjlilbj 


"3jj 


Aosujj 


!«X),y 


Jj>JU 


JljdL 


(JjSliJlJijjV) 


<V=«> 








(U>-l) !*lj») 
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y.i.i'. i.. '.rudi.^.Li.iu ai.u i. i..ij i i.i i .i .iii .■j.j i. Mi: 



j 

. ( IBM 3850 sa^l ^ ) oUJl & ojUL. 480 aj Jb* Jl l«=^ J^- 4 4-J»Uu 
i 0>l j^^-j ie^ i_JL j^ SOpIj jju- V, t ( ^Jl c tijSb J5>y i oUUL 
jf olill oU^k-Vl ~~J Jl tpj^. 1980- 90 oljiJl j „U£VI 01 ^ li*, 

( o^L^dlj J^JI ) ol jJUill _ 3.1 



T2 



i_ 



:irg;-«- 



IBLOC 



SujZ^ijJi-3 J££ 



-hirg: 



Jl SjJi ^^o 01 ,^£c N jJUJI IJla t oU-Jl ,y N :Op Jp iLS JS" ^^ 
Jl 10 mm {j* l lJu\£ oU-Lw XLJ^ l^^u ^p ( J^JI ) SjJlAll J*ai; . <£jd 
L. olj>o jf Inter Records Gaps ) TRG ^Jtfj t **~Ll L>-jJy&dl <_—?- 19 mm 
c -^aiIjJ c jmJ^UJu 1uj_J< JL».«.*^1 <oIp- (Jj <. IRG olj9uul sJLa . ( jJiAil (ju 

* 

Jl ojJjjJl rt— «2j ( fc£M «*L» t £** J La it^i 1,5 ) g^lijJl ol iijJ4 -*» . tfiyc* 

. ( 4 JSLi ) . cOb>~J 



H 



I^UiW^ , „ aa-J „ ! , 1 cnr. , , „ I enr. ti| 
H I bloc •">** ^ 



£>%*~3 4 ^ «1> i jOl - 4 JSLt 
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y.i.i'. i.. '.rudi.^.Li.iu ai.u i. i..ij i i.i i .i .iii .■j.j i. Mi: 



iJp ,y> n t n j (bloques, blocked) i_«_*jf ^ c/>L>«~dl ol lij Jj-* 

^u. jc SjLp 13*1 ^ . £.UjJl ^ji— J ^1 iL>~dl Jj>-^ ^ ^f o>-ji M 
olp^ ji uJil 0j& of w— -5 iL^JJ o^ ^ ■ c/^ 1 J^ 1 «i ^ 

( iljk-Vl Jp jf ) Jayill «> i$>Vl **~ s-M^ 1 ^"^W^ 1 ^ ■ W>^ 

. o}U~dl ,>• n - 1 S*ly t n pij iL>~dl 

J_>~- : a^te* »JJ-^-J (fusion, merging) jm^JL; ^ ^js" ^La^V' 

. ( 5 J£i ) jJU«ll ,>~»j otf>l 




SJbU otsUJU ^jj »li~-l - 5 J£A 



t JJjJJ iikfc oLji— *L!Jl p*. . ^U £jL JSI^ ^b ^ o*>U~Jl 

jl« . juadl jLJLI J jAil j^Vl c UiLl jUl _ JJJI J 6>J . ^XpUi 

jgst^l c blll jUl _ jljjJl J OjiJ t iiljk-Vl oljL- g* *JaS Uxpj t .iAJi 

VV ^Jli. Jp BJ jJb g^ Of o^' &4)\ Js^ 1 ■ W*^ 1 ^lA-^ 1 J J-^l 

. ( 6 JO ) disk-pack ^\j\ ap^ J£J i£f «, (Cylindrc) oUI^M ip^f j£i 
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1 




1 








1 


1 




AAX 




ALP - 


/ 


DEL-- 




zou*- 


HOT-- 


ECH - 




2AA 


LIM - 


FOX - 




9ZZ 


ROM - 


GOL - 






ZOU - 


HOT - 





I. Ppal 



I. Cyl 



I. Pistes 




CHA 



CHB 



CHC 



CHD 



DAA 



DAX 



DEB 



DEL 



J* 



Cyl:Cylindre : i(jk-| 



^^11 _ JJjdl J ^i JjVl il^Jl . vi~JJ DAX ^bie SL^^jaJs 
DAX o^ ) AAXy^Ml ^luU oM j4J-l IJl* J bj^* ^-J DAX 01 Jp lU_> 
Ja^u JjJuLl : ZOU _. ^Sj tfJdl j^-l J VV *£Jj i ( AAX & « >t 1 j* 
jl ***-! >l jl«' i A4i>]l ^j <. _^l iJkft i .j>b . >Ui»U fcljk-.Ml - JJi ty 

. UU*i-l ^ dJUi J^p . Ujb*Jj ij^lUl iL»~-dl Jl J*^ ti 3 " 

^Hj * j-iJil lM yJl *^ ,y Z^ ^^ al * <j* J^ ***;fcryi • u^' 
. SJU&JLI U-Ull £ji £. j^>^ JSH Jw lil c 50^ j-V" 



3.4 



4 c ui. sk-v. auj j* >4^ ■ ^ «^-*> r^^ s ^- , , 

**V W* Jl ^^-JJ *fe>JU W~il jJjb «W -^ ■ J-A—jc* ^ J-*-* 
J S^U -ultf-iJL* JS jt Ulji U*p JS pi" . S4»-lj V-" ^'*M£ v- 1 * 

c ui j*J. o- o* jaJi o- ^i^i t*wu «A^ ^ •^ ' "^ #" 
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^/Jl ^1 gj* ^J j-biLI li» 4 uiVUl ilr Jj • £*M *M* f^ 1 
" PL/ 1 SiJ J REGIONAL(l) pJisJI 3U J ^i-y 1/ ) J^-Jl J V^ 

c * . ( yji djJ ctf/- ) JiU 

Jiii Jp iL»~^ oUmLI 0j& Of -L> 4 5^ i5j>-t JjU- jy*Z u^Uil ,>* 
ii. . o^bwJl ^jU jJ/_ oUi> - L^Ut oUaJ sjp Jp iL^-o* J* 



ik^iUUL.-TjSLi 



. saio. Lifj c, 4=rj^> J-^- tLiJ l «■ *k^ tr^J O 5 ^ 1 »>* 

. JaUi .Ju» Ji- V s i3> SJ ^ du * ■ h -^ ^U^ 1 ^>— 

(labPi)^^^^- 1 - 4 - 1 

. ( iiljll '**-£ ) 

U£JlJUiiiU-l-4.11 

l&l JaJ^ J^to Ub ( ^^ *> oUU ) W> M * .J 5 ^ 1 0* 
JJtJl J_p i»L^ SJLp ^f ^ 4 < iiljll S»-jU oL-lSU- jt * ^Ital j^rt*. ) 

iiU Oil* lil Wrf U*J> if JUi ^ j* ^Udl JajjiJI 01 Jl >xli ): - -i*^' 
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AjUSJI JUi 5jL^_4.12 

^ x^- iJL>- Jj . ij^£a <L^_J SjJ.L. ; t |^s SiU[ iJL*^- tlyj-l ,^$^11 -y 

• is a &*~'' {y^s. *^"J Ji pijAJ j\ <■ *^ S:s W i^ <■ J*i>Jl 

ilbj»_j . ,_L>«~J iJ^p ^1 JJ ikJ^Jtl i^UJ -yi JS>_Jl ^j^i ii^kJl ^^ 

. ii-Ldl oljLJ.1 JIjlx^M ( iljk^Vl ) j^ytfl Jp iU^- aJUM OljL-. 

JjLJl4-sly._4.13 
J iLwc-J.1 lilb a-j^J 4a. ^ . (parity) jalScJU ~SJ- ijklf 5^U J*jcuJ 

. oJLxJi 4jl»jl*ll 

( «Soll\varc» j\ S-^dl ) SJikAl iUJ-l _ 4.2 
j^jp oLK Skvaljj i»L_A-l _ 4.21 

lILUj i^L^- £»Ij-j ik^lj-j ioJLill olojLdl a JUh ^jy JjlkjL J-SJJ Jl>-jJ 

sjioUjJl ^yj^w j il^- _ 4.22 
ilr J-^' <■ ??*"./-' lij^ (J *. J^-Jl JU>jcLu»I iijjl' Jb-Ltf- /^-"J^l /y 

. iiUSCJlj ~of.\joi\ J jt 4>ll£Jl J j\ c Jel^l J N 1 ' yAA dj& 

. -Vj-L?- t y> <■■ jJl jj-b L^jUt-t LiJ^Jl oj>jUr «*— j (_5JLll i (J^ill «^JjJl J 

(Cryplaj»c) ■jSIjJ.I 4k«.ljj iUJ-l _ 4.23 
. (jj >>-l aJL-JLjii ,1[ L><^JI i_o]jj ^ul ol«~-Jl 4JLwJl~d J*^ 

(( "ill ■ ( jLfll'l c-U- ) jV-Ol oAjL->- ~s U>*)\>- -jj»j I Jul iL>t— «o o — J t jys- cA«j\£ 

. cul clc cryptagc) 

ijj-S oUJ l^t5 Jp >-~ryj j^Jl i ij-Jl o">U_Jl gys ( *i j = ) jjSJ^ ^ 

2 J 

. £5il 4«^p j jJj J^-j io-JaJ' J^«-^l 
JJLiilljy.tl-4.3 
. iiLv=>J tiy>- ?«— j A»y ,Jp ^yL*! JSlij /»jii o'iLw-wJL! Jc*-^Jl uy" 

. ^LtJ^I ilfrJl jl i^I J»Vl o'sUJl ,jp i^J -LiJl ,y& 
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: ytji oi.i^v 1 ! ^ r^ ^ * < ■ • d 1 1 ^j^ 1 °^^ ' oUil 

i ( ^1 il,; J* J jf 4 fJ4 J* J ) ijlS, toJ# olSjf J Up fc-i ,L^L ^ _ 

jsll.j t isai «> ^ spL. v.y Jv ' ^" cM- 1 o* ^ ci 11 1 n :u ^ JI - 

VJL o^ M S^ J S*~J J*^ ^V '^ f-^" • ^Kr^ 1 ^ J f U 

cA»l>Ha**3vJ 

Wj . i-J>ULI i-U^iVl LpIS J Uj '*yry 0j& ol J* n - 1 *~-Jl - 
J_* o-jUJI ^ U^ J^U n «i-dl j?£ Xp 4 NUi^l JSVl 4 aJUU 
J l^^iS jt oU~JI ,y SJ^Ij J^ 01 (^il ,>■ • ^-Jl oI * st - 1 ^ u^^ 1 

jSjll tfUi .Jib* 4 us-tU ^^jn-2^/1^^' ilfll Jj- 
IJU J^. Of J^iVl ,>• 4 k&r 01S" lib • vV* 11 ^ U ^ > ^ ^ 

SJbjJLI fc^jJl . JU-**J Wjl 4U c SJfJbr- 4i«j *LU1 lfc» t-5^ •> J* Jj - 
n-2 4i«jJlj . jJI i n- I *i—Jl j^nfc—dlj 4 n ^5; fc*-Jl ^ £r^ 

5k-lj_j iSij-ll jl^l i^% J^ 1 lUH- Jl 3 J~- *' * C^' •>" 
i^M oL.^1 J^U^ Jb* i oU>dl jju til f3 0l J«^l Ui! Jb-"iLi 

iorl^ Uj o 5 ^ 1 4>" • *1— =-A' ^^ ^-^r-Jl i-JiiV a~UI jSBjll 

: iJUl 4^531 

C. JOUI-'FROY ct C'h. LtTANCJ. I as Jhhicrs. Pratique cl clwix Jc 
rorxtmisiniiiii ilcs tlimmrx informal '/i/i/i-.v. DuikhI. rmliliun IWI. 

H. LEIfCA, 1*. BINIi'l", Wmeiitx irinformalhiue tippliqiuv u In Ri'stion, 
Dalloz (Paris. IW2) 
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four In cryptographic : 

W. IJIFFIE M. HELLMAN, New Directions in Cryptography, IEEE 

transactions on Information Theory, Nov. 1976 
R. L RIVEST, A. SHAMIR, L. ADLEMAN, A Method for obtaining 

vT^u"tT\7 l ^n Key Cryptosys,en ^ Comm - ACM > 

Sitr les questions politiques liees a I' utilisation desfichiers informatiques ■ 

K GALUIUEDEC-GENUYS et H. MAISL, Le secret desfichiers, 
< ujiis (Pans, 1976). 
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^i^i j^ai 



CAAjjM _ 1 

£.ljJU i*Jbj 4J3}* iiijV ik^l UAy jp : jL-^Lui f\& J-£J ijj^ 
t V^-A" ^i^" J^ til ^.J 1 ^ 1 <Jl**^l j*-—^ lily isM-^ pJ^ • ii**^l 

J t SjUj . oNU-l i_-1p! J <-ilS" ■>* i^-^S" o^U— J* 0LL0J.I ii^jl 
J-wJl IAa pftLJ i„J.Um itj-iVlj c JJLJ £jJ -y S^JwJl cjNLjC^I 

• ^^ 

d\S lil t ,_/> lyVl Jp jJiL* p>Li c/>W~Jl JUjou-1 lj& pA»l **j~>j ^M^iJ 
villi JOu . PL/ I jt Jjjj^ UJ Ji. t c/>L»~dlj ^ilill *Jj^~»ij ^JLo" *^j bj>* 
ULpj 4 oL' ijio 0j& L« Ul* jJl cj^L>*«JI J jS^iJ : jj-tfll J^-- li*j t Ul^j 
JjL. Jl jj^ll JuJ IJu»j t jf i iL>«J JJ Jl jjL £bu ^Uil ^ jf iiUili 
f-^i^ijA c ^L- ^'ly^ fjirf OjSo -jJ jf jjSL-. J>«-Jl t)L cJly^Ml i U^ff- 
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<«->«■'- ilj li[ iiLi (jjl <L)jJo Jjj^ iJali- 7W2J jl ■jSlc 3yi>Ui!l aasoII oJLib ( j53j 

"* * * * * 

4_*A*^jj| <UaSj1U I^^Oj ojj-^oJI ^fc ; L^LSya (ju \j\2j \j&-y* I**** *^>-^ AJL^-jJI 

of 

Oi"^U^, tLtJl Jp U^£ oLk«ll j^uJ i_iki pJaJ Jl a>-U-Is t dll U isL^l 
iiLjs i 1^^ o")L>»Jl ,*«- o\£ I i| . oj^-jll o*)U«-Jl {y> j jlp J^>- ^y SJbJv^- 

d\S I ■>! ^^-^11 Jpj i ioyu J5I>U ii"5^l-l JU, t ^JS J^i Jl Jj^jJl ,y J^- 

SjbNl jf f .k.:il 5UL i*^il c/^^Jl dJUS jbcu Ujulp t JJUU asUI 
J^x-JJ S.uU-1 -jSJj aJL$~JI ajJI jf i^jJli i ( "te» au** aS^-S J jjI> jJl Cj%~~» ) 

JO J>- ^p^ilP ^1 Asl^l LSjT Ojj>5o ■ji . J^4j jj>_jlaj lJI a^C LjbJb- \ijb 7t~fiJ (M (j-M 

SjJL^i O jScUj ?yl^Jl /y^- 0*il t aJL*~J ^t J Jj^ll «-LiJ^H Sj> UjLx *3ji» ^p. 
iil5 JLbViu-1 ^J»y ^Jl A»JsuVl ^jft i Ji-^u 1-iSOn JUi>-[ Jp ejjlill Jaii . .y£*Jk 
•jj Oj-^SlI oJLA t 0"5H>t-Jl Jl f-jL l^^" J»*i-J ^j*} . ^"I^Jlj 0"5^-Jl Oil 

. pjyilJl aLl^hI u o wJiLa IJIjI Jxll*J 

oUwdl^-1.2 
aj i_J^ (^JJl jJjJI Jp t5j^ jl (j-C? i^>Loi!AS3l c/5k*-Jl -j* i^j^jf o\ 

t LiJ| -jSUll ^ 4*« f^jj Jidi SJUiti OtA^Jl ->• **j*^l »-i» ^^ ( M 

i Jjj^u- /j5Ut lijj t J^j_S ik^Jl A^jdl ,y oLWl Oii Ij^"^ ^^^ 

•^ a-c.j.*^!! oJL* ^JG JJUi Jwii t oLJaJil Oy oU%Jl c *^** <JJ ik— IjH 

1,-i ikjjjlil oUa-il -y> ASL-Li. Vj*^ uiJjj' lJl*j <. oUa**U U*f o")U~JI 

iJUl oLWU ^^ t LL^-ljf *UJ1 t AiUl j5Ul -y. : ^j^ lily ^ 

Jl ^-bi oliU Ak-.lj.j JjlJ^- o* ^►H ^W^" Jl M 1 * * oLk*ll ,>- oU^I 

• yiLLl yLJI 

uu-UuJ.1 -*?>■ L«J t^ai jJlAli^Ul JLji oUtuwJJ ^f ALiJl AjUc- J«^u- 
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/>Ua_i j jLsi»l J?**- »Lijl jj" ^,y^f> J*5T j* J**!' J "^jLJ^I p+4~ a-^j 

• ^ij^yr 0L» j/l (J^^° f:" fT " "— ^" 
JjVl JJb-j-ll jj^ JUjj 4iyT J < ySo luUsuJ.1 £*?J. (ij^l oJjUJI ^ij 

J^Lftlw/^ll j aJj-^-^ST 7W2JJ I ijSLrf'S^ll 0*&>«~JI OlPjAjf ^ ,_^pI ^— 

(S.G.B.D) oLtudl ^uiU S j\i\ iJajf - 1 .3 
4_j i^UM pftldl OjJb Jl*z*j ^ cjLk«il /t«jf 0l» i l^il} 1 1^' cj")L> l -dJ J^l^ 

. oLkxil rujt- 'jll ,jJl ^ jtaLJlI oJL* jj-wiJ . iLU-iJ 
jAj . oUaxll ji*if J iLojCuJ.1 iiwil^llj ( ijJl jl ) i~Sjdl 3-bi pj-LjJLI IJLa. 

s ' " 

J* itfjjll 4_ej_*»MlJ 1 oUylxll vilj ^f t oUudl lilj ,*-"Li Ulp Jaii^j 
1 4_^-1>iaD Aj ibJlLl pwljJl (Jl *i\*J>\ «. -uJxSj iv«l=Ll pA.Lilj t oUaxll ( >i*jf 

. if y aJUp iV i>-U- ilbfc 0j5^j of Ojo 1 aJjJwi jf /»l>- oL.jJL>w p-l^lj 
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oU^Lxil «-*■ Jiiij jf J&» t LjJ?- a!j1^ ^ oUaaJJ tyy-Jl tUi-Zifl jotmall 

^»jft o*5^1j ^jJI *LLi^ ^vJLyljt ^jJU _ f Ik *li;y 4 (log-files) aJIj=- 

. ^Ual*! oLLu aa»Jl A~-JIj U>-Nj '^L^aiS 

. J>-b jUjl** fit; 

Ji^-ji ^!| ( J l Jb-_^. goji JL>.ji ^ -jklj i J 15 * ^j 1 * y J^-l l>i* • oUjLJJ 

. ( 2 JSLt ) f U> J£i. oLyUl iyc^T Jby JiL* 

oUmLI ^jJl J-bill a-S'jJI - 2.2 
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C3TOD 







o o 



JU^Li oMl>- 
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Jj>- oUjj ip^c J^Vl J ^j 4 CODASYL <•> iykl! c~p, JiJj 

: 5JbJl 
/yU- v^ ^c^JJ JS" jf J y, £jL oLLdl ^ Sj b| f Uy ^^ of ^ _ 



. CjLLJ.1 J| jOo. £jL «*^ of ^ _ 
■ o#& d t> £»^l i£*^ N jf i_^_ 

. J*tfl JCij U-Ull ^la ^Jl g.UjJl oU«i ^ v-^ ^ of ^i . 

. cjUWU £jJU| ^Ji^ ^„j of ^ _ 

i J=«j J£^ p-^ ,> Jj-^-L J*mJI CODASYL i.jJiuJUj . oLLJJ ^ 
. oLW.1 £^f ^yd i ( ^Jl «, MEMBER 4 SET ) JjJbfc *LjiJt; ppJU 



uLWl ^..U J,>. J»* i*^ I9h6 <_* oLjI 4 Conference on Data Systems t CODASYL (*) 

. (Data Bases Task Group) 
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" . 5 >y ^V-^ wuJij ^ ^ ^ . s£-*H .**-» 



P 



□ 







.1**5^ 



(collalerale) ^> cJi^ J& oltt* bi,*, j^, d Uj <JLiJl j* 
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. S.G.B.D. oLWU ^ 5 jbl f UkJ i^JL jL^l 
1 C*^ 11 <^L* <3-U JsM li« . «^jl JJt*>» oLLdl ^ jj^ 

c JhjSJI iJJ (DATA DIVISION) oU*dl ^ ^ ^ JJ^, |jbk 




oLLdl ^ ^j JJwVli ^ _ 4 jj^i 



i*&I Jl «U1 v £JI t ^viljll Jl y, oUUa^l t j^ljj : S.G.B.D fltJl 
V-Wl ^" : oo^^c Jl j^aj ^ oLMl ^.tf SjbJ g*L. ^ i^Ji^ 
U-L~ iiJj t (LDD) oUwll ^j iJJ : i^ iJj icj**. JJ . ^y 

^ L^J iUl&. oil* lil c ( PL/ 1 t J*/ i Oljijji ) ^f £J J iJUMJt, ^ 
' Myjjj Cf SUBROUTINE c J*j-Ol J liU| JUif t ^1. : fcJUl a* 
<lfc«, iiJ oUUl »0a UAy i^Ul 4JU-I J . jJl PL/ 1 iJj j PROCEDURE 
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^Jl bfi t c-JLI oLU Jjju; jf u\j * «M i •Ull. £—>" LMD iiiJl 

<*) oUwli ^? s>J s*^ J" as ^- 2 - 3 

SkJyi 4 t UU- SpjjJ S.G.B.D oLk^Jl ^f ijbl i*&f Cf ^ ^ 

0* jjJj^llj t SGBD f UiJL ^-i Sjjk^j iSL/tf vV~ ^ '^ "^ 

jf j>> t JOURDAIN jlJU i-JL \£ «, oUa*JJ ^ Jp I>U»>1 flkll IA* 

. . . I uJLkj 

LybJil op gJLJ L^ ^yuJl c A^Jbfc ^ S.G.B.D f UiJl -pU* U 
^tyM i-A- ;/> gJU >^lj c ( DMS-1100 c IDMS t IDS ) CODASYL 
gl; U,f jrf-^l jAJIj t ( SYSTEM 2000 t AD ABAS <. MHSFIIT ) i-jSUil 
c^f Jj_iJl 4_JJ i-JJUi . ( TOTAL i IMS. ) *_-Stj_=3l o^-^Jl o* 

. SOCRATE 

*a~j J* J_*j* li-N c^*>f ^Jl f. Bull-G.E. »LSJJ o- y> IDS r lk)l 
0- Bull ol-^U- £_*b. «-V* >*j . Bull Jm» ^ UUj t C.I.I.H.- B *»Ui 
SilJl J** o- j^J J^ J~^_^j . GCOS JJJdl f lk. DPS 8 iULJI 
Wjtfj*- Jtfl/. ( COBOL- IDS c l-~JI IJLL t ^Jb" jJl ) COBOL <. aJUJI 
. Bull oh£,j Uuf cJLpf J* JUo-^l j&yj t 1963 S^. J ifcii-l J 
y^ljj LJji J 4«yl tgj?- . (U.S. A) Gullinanc dJUUy. i IDMS fUfcJl 
j>Uii cJ- * 303 X iLUI o- IBM KjJi oh£. Jp J**=J, . S.E.M. A SJiJl 
^j SIEMENS 4004 cuUSO. J_p Uj J-<^-ij 1^ i DOS jf OS J-iJdl 

. ^Vl oL-U-l 

tjj o* ol5 ^ c -^ <yj • ~^ ic ~* <j* 1DMS r 1 ^ "*^^ LDD ^ 

. COBOL & J iUlJL^j i iup ^ t LMD iilll Uf . i^Sbj *l r -jfj *tyf 
." jlUll J JL^cu-SII j^^aj i 1972 fc- U»i.l J flfeJl li* ^ 
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oUU-l ^Jpf J* j^U-l t UN1VAC <y S.G.B.D f Ifc y* DMS-1100 
oL-^J ^ j,lki- y>j . EXEC 8 J^idl f Ifc o^ 1100 aJUUU S^JI 

. CODASYL 
£. c ^y oUwll ^ ^j^J ^i .LL^^ij t ^_ ^ LDD ^ 
t^j -tfJj . Jjjll Jj oljJjji 4 J^jS ij J LMD UJl J^j; . ^ S/J UI 

. 1972 i~. J oajLl j DMS-1100 

^ Ws4 <~fcll ol— IjjJl j^. J 8 jLSJ[ ^^ t MIISFIIT f UiJl 
VS, DOS, f lbdlj J^, IBM 303 X oL-UJJ juipI OiJj . Aix-en-provence 
U t i~wi ,y» LDD 4^Jj . i Jj: > ols^p j| t t l_if ol$!*p |Ui Ny^j . OS 
jl ,. COBOL UDl -j^i iUb jf t ii,Udl «u^l| J ili^. ^i LMD £JJ| 
. 1972 «u- Jl *£,b aj », . JljJU Jjjll ttl J jf t PL/ 1* 

U y J £_3jy • ( LJVif ) SOFTWARE A.G. ^aHI ii^ y> ADABAS 

ibU, it j^. ^1 . iS^ ^ i^ all, vjljVI olftUI . oUa*JU ^ Sk-lj, 
ADABAS f lkU jSk . p\J\j oLUll ^ o- J*M dL» ^ » iaki^j 
4 VS t DOS jf OS JJ^I flk uil^i} ci IBM 303 X oL-bL| Jp ^ jf 
LMD iJJl U g iiii^, ^ LDD iilJl . Ujf SIEMENS 4004 oL,U-l Jpj 
PL/ 1 t FORTRAN t COBOL bill -^ U| t (AD ASCRIPT) *Lt-, 4 ^ji 
>Uj 1974 i- JJ f lkJ| | j* ^jb ijAJ _ . (CALLS) oUt J£ji Jp J t Jjjll _,f 

(U.S. A) MRI systems ^|d| •y.j*, t S2K Lit ^Jbj t SYSTEM-2000 
iM J**;.* • *~^*l i»-li.| ol^^ij io=L| oUjJi ^ a -^l , >i f jjdj • corporation 
I INI VAC 1 100, OS fliiJ; eil^iL IBM 303 X : S^JI oL-U-lj JaSL^I i_Jpf 
MKM) iUUl -y. Control Datsij t EXEC 8 fUi-Jl i-il^l (1110, 1108, 1106) 
Ufcw ^y. LDD iJJl . ( NOS : UU-j ) KRONOS jt SCOPE *\kl\ uiljJA; 
jt FORTRAN ,. COBOL iJ J *Ub_,f ilii^. ^ LMD iJ U . (DEFINE) 
. jlUll J IjjiS' J«jc«j|j i 1972 i- J i.JLi-1 J 9yJ>y> . Jj^ll 

303 X iLJUl ^ oLvU-l Jp J*« Of -_/xc, . IBM g\ ^ y> IMS 
iJJl t-ilb . *Ujf olStApj ^ji cj\i^hu y& jAj . DOS j\ OS |.lkJl v-il^b 
(CJIS, SJUi~* ^ LMD iJJl U . ( ^j/a oUJUj ) oUJLw -jjlTU -y LDD 
Jl (CALL) oUl. JS^; i Jjjll j\ PL/ 1 t COBOL iJ -^ 5Ub jf IQF) 
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. ClCS^J^^JotDL/U tfs, . DL/ 1 

SWrf 4 JL*i^l jcS «if >U, . CINCOM systems ^J o* J* TOTAL 
IBM 303 4 SIEMENS Ifclp^l ^ ^ ^> ^^ ^ 4 ^ ^ ^ J 
^ LDD AiJJl . J^IJJI o- SUill Albrh ( £jl * Control Data 4 NCR 4 X 
jjHj^ J (CALL) oUt J-SLt, iUb ^ LMD iJJllj c (DBDL) <&-* 
. Assembler jt FORTRAN 4 FORTRAN 4 PL/ 1 4 COBOL 

si* ^if Mij . (IMAGE) J-j^.^ *~L*- ^1 V ^ SOCRATE 
Jp J~~ y>j . ECA Automationj .4 C.I.I. JJ <y ^Ul liA ii^' Mj*\ 
^\j& "4 IBM 303 X obSUJJ SU1 ( IRIS * DPS8 4 DPS7 ) BULL ol^Ll 
. otk^l, ( ctfjUM ) oL5jdl 0- >lj ^.y&S3 ■ OS -> l DOS f ^ 
■■ Jjyfll J SUlJfcy c SJ.12, *^ ^ LMD Aiill U . ite~» ^ I-DD 5il« 

. i^ii Lji^i ^M^ 1 *** <i J*-i» ,973 *•* & ^ ^- • ^ ljdl Jj3il jt 

1 MARK IV 4 Sj-«— i ,A-^I ^ — oJi—jMl is^-i L_vi_.t J _S'^_J_» 

. £j| 4 GIM 4 FORTE 4 MARS VI 4 QUAERY-UPDATE 

^ 4 ijSJLI i/laJI J jj^ 01C Jl ^ ^bll a* jt tJl U^ ^ V* 

jt 4 Jit J^> 164K Jl ^U4 SYSTEM- 20(K) f lfcJLi li_£* . aJ^ £^1 

■ 0*-^ Jl ^ ,MS f^ ' ,R,S 50 ^ > ,2S KB & G^ socrate 

J L564)64kWonl -JSlJl £ b4lDS f lkJlj 4 OS/ 370 f lfcJl uil^L 400kb 
.--jJl 4 DDS S SJlJL. cA£U Jp Ub-ljM U£1J o 3ft -^ ( i*K 

4 iiL? Jl£iL, aSjlIIj ip^-Jl lyyi Jj i jW-^J £&V f-^^" 4/^ 
tf^ M_U ijb} jt vw^l *=W" kjJ^ X^ -> ! f 1 ^ 1 ^-^ 



4l**A 



. jj^ jf Jjjt JuV 4 oUSjJl oUL*p J J-^-^" of C&3 

P *-VV 0» t*«-iJl u-^ ^ lS '^ iJ, i^-y^J-" oLkJ.1 ^ ^JUi" 
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. (macro-economique) 
WiilvaaJ oLkuw wih »JaJ _ 3.1 

0Laj*P_3.11 

oU>ll ^ ^J| t ^|| i^i v-JL jUi ^j UjlkJ lyJB Lib JS^' ^a, 
«, oUJJl 4 iyil t ^IbiJLj ij.^ oUUi y^ ^ JJlP t ^j| j 6jJiJL1 
J1I3 1 £jJu> ^ lb ^3 <. liS^ . iil^ a^ il£jL, ^ oLbJ.1 dL Jl J^x 

>4bt 




,u-,^ ^ElSt] 



^UodNl o-L.^J.1 dLl f UJl pJidl - 5 J£A 



iJ.Ut 43»>» Oljil 



a>-^ ^j . JLJLI Iaa ^ i_iJjll !j^- ,y> *4Uj : v^l «"sJ» ^ ^» "j" 11 •■** J ^jlt" oLyLJLI (*) 

. ojLoIj'VI oUuIl $jj Jo LL»* t ilUi ^jti ij_^» 
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4_*j»ji Hj^ . yejb ujl. j^id 4 Ljj^ oV 11 r 5 ^^ J^—* 

t U~P I J&L iV-ll iuj-Jl iloJl ^ N Of ^ ■ ^^ *^b ijr^ ^3 

VlS^j . 4oU*»b VU^i Wh kj^ (^^ * u^ J*^ c^^^J 
. iL^cJJ c iUJJ Jit* &l*i[ oU^ lit* > J^VI c J^li 

jt t ijjb jt ; j-kil '**r V** 0j& ^ o^ c^ «/ ,JsJI '^^ 
.lll-^i u* ifei p. ^ii aj>« & ^^ f ^ W ^ • M^^ ~ k 

(lime ( pjjll ) f>ll cJ^I oLS J^' Jl iP>. oU«ll C^ JUj ^ 
fcjjl ^ " 3*^J*^ ^Mj ^^ aJL * V O^"^ 1 ^ 1 «J-> • sharing) 

^ "^ ^ iiisL-i j>i of ^ v * y^j • ^ a*- y* ° g ^ 

. JUjc^M ....... .» » U 

J,ISX Ukfc oUwU iiti JU*^I 0j& of i «iAJ^ *»U»1 t. tSjj^ 1 <y 

^ y, *;i^i; oj^ of v«e ^-i^ 1 -^ v-i 11 • ^^ iiJ ' u > 11 i *^ 1 : i - UJ1 

jjp'ajj CJ xi.y oLk*ll ^ JU-s-1 Oli * oS^\ Jpj . il^Jl J oU~ll 
OISCL ^ i Sv C l— olj^N c^jJ^u* ^ J^ Oj^ ) ^U-iVl .y o^ 

Oj-A- JAJ Of J*-xJ JS ol^b OlS lib . ud^l c rrri U a ^p if 0^ j 
. usli OjJbj ic^p ^wjz- jr^-^l li* i*J ols v cAJmU ^*^ 

(4^1 : c s ^ld^lil)J^lj^jf^b^^^ s ^ W liL ~ LJ1 

^ , iij^Li c ^ . iJ4 jf ^u^i V=* «y 5 V- a ' ^ ^ 5 ^ JI r^ 11 «^ 
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ii^J J oLkJ.1 oAa LW lijj . j jo*Jl j t X irjdll ^ » i iJ 4±}\ UJUI 

Sjj^3l oj lil Jj£ : iLJLJl J iLJj i»J 60 lixp jjSL- t olji-. ^-i* •>. JL*) 

• ( 6 J^ ) »jiP 6° u* j* iUUl J> ob * jfiH ^ 

J^jj ' H=r 0* <J^ J ^-^I g^lj; 0y J— '■&*. Js'j 1 iiliJfc jjS^ of »_xjt i list* 

go.ljj ^ i oLkJ.1 U.I*. £. iLScu iiL jf i COBOL iiL iySL. OjSJ U UU 
{.Ik J_> FORTRAN iJj j hj^i> oj&j 4 ^JLp aa** ^ UU t jU*i-Vl 

l^t J_p ii — JL~_JI ^JJj_J ,^J| JjxJl-I ^»L_i_p «COMPUTATIONAL» 
^ -jP « INTEGER* gj-^l j\ i Jjij^l ii) J «COMPUTATIONAL» 
lil ^^j t oUKJI J> d>- JSLUAJ oL^ 1 £» * FORTRAN iiJ J Jj.O-1 



Code : P = «jri j* 






I 
NOV 77 

OCT 77 

SEP 77 
AUG 77 
JUL 77 
JUN77 



JAN 73 
DEC 72 



i 



D = Jfc 



34654 


P 


33425 


P 


33322 


P 


32476 


D 


32438 


D 


32200 


D. 


... 




20645 


D 


19546 


D 



tjt" 



50 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



^bll>u t Jdi . »> o^ V-kU ^' • -^ a* **& C? 1 ^ 1 oNU - 
o^U^Jl .A* ^ J«-*l a- • jJI * J> ' ' ^ J 4 H J f Jl ^ f ^'^ 

oUU li-jS^I o!3U-JI ,y ^ & v- 5 ^ 0-J • SAM ) S-r^'j 

oi t J^ ^ y • r V» -— J * ^f v- d 1 ^ ^ GT^' 

t aJU-\ ^ .A* • to-** "«^ SJL - J* J-** ^ °^- ^^ ^ l ^ ^ J * 

jjj ^U^Jj *UiiJ - 3.2 
oUMll^^Jjt^LtJl-3.21 

. W^ Jbu W^ 4 Jte* 0^ l> l < f0rmalt6S * 2 -- dl * > 

■ ■ • ^ • ^ " . cV J 
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c 



2345 
1 2/12/77 



m 

ajL^l 4JL4J* j>-l 7uju H 



(»J t5>U - £»* 




34654 


P 




33425 


P 






33322 


P 








32438 


D 


32200 


D 






20645 


D 


19546 


D 










1 





<-***>j lS 'jiXi - /•-«■* 



VENTE PRODUIT X 



NOMBRES 



01/10/71 



05/12/77 



60 



MENSUELLE 



USINEY 11 



: ^i. 



^iUoaj oLkv lIAu; j^U- t oUaJLl «*»J, »UJI ^.hall _ 7 J&J 



<<*ji *Ia»«k«J - 3.22 
oU«dl 
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CjI«-Ij?-| XJcS •>■«?- v_JI jj \gS . Ljjublj .yjJl *li*i»»> jI o Lu . » J i^ull ji- j\ 

JjJl oUaxil ji^ r-ljitl^L J^-l jJl oLkull liJLj /»j5j i o A* r-&^" ijUjJUo i-^—J 
?-uJ!)U sJL?- ijjLoJLw J*>-j Oj /J* Uajil ,3J*»»-» . 7*"¥ tjr^ Ly^ ut>- j Ipij*' tSj^ir" 

is**>^e> 4_X£L) »j-f£ jt^. Oj~^Vl oJLft CJl£ lij 4JL»wi SSj-Jl j ojb^U JjLojLw 

ijllall g*ljJl *~f; Jp UojI (5ji^ jAj . pil . . . Js^-Jl ,y J— ^** ^rj *ll»- J 

. «J| C VLA' l ToljUl OUJ» 7<^J 

c ^jJl jf 1 ^j^UJI ^JL-dl JSLJL. Jl oLxJ^I t_ — -bit -^ il^l Jj 
. cJjJl J^- i-jw a]j>JI iJbdl i_fljj>dl j-Jcj of o^Ip <±jJbi jlSs I JSCa . ?»JljlJ 
: ( ioLaal- jjS'U oLk** ilj^ ) -j-1** ^1j J iJUoiJI jU-»Vl JJ- 5 j-* ^» l«i^* 
/jj i_Lta J^j . t_jL~J-l <Uj Jp jJcj LaJLu c ij u,rf 7 t, j^' ls 3 *"-? a ^c x ^ **dj™ ^-"*4 *4* 
i-ftUI (3^1 1> v-w <LJL1 ^j* . JU*zJ$l ^u> ^f JJJl IJlA 5JL-s-jJl 4LJLJU Oj£> 
. aJjLJI -jp iibfe i S juji?- i>J"bl *L£j[j t 1— iLJ-l iSjjt <j ^»^<-Jl r«ijlj •&& 

6UjcSi\ -3.3 

oLLjJil^u^i_3.3l 

■y q^Ij jSli; a»j^jw c oljljJJl Jl^V hjjj^ai\ t cjUjLJ.1 »JL* OjSi of A4II 
L,- i_to«i„j of >_-£■ N jJl suL.jJUil oJLa J^Lu a1S^>. jl^-j-j. . jj_aLl J_J 

j^f fr^gi J->JJ| J . SJJbw oL»jjlj_si- i_JLki fj2j M 4jf i>«>- C-J^ i Oj*fL»ji*ll 
. iJ^Ui Ujt !lil J^l>- ,y 1 f IbJ ^l^ Jlwo-il : 'I cmps pjirtagfi - |^«i. iiij - Tiinc-sharing (#) 
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. ii^t otaf <y ^rjl^ ifHj f^f *kj]a£ S_,Lii->l jf t «Listing» 
. AjjU. p-j JSlij jt JjlJbr J&J Jp s^Ip ^ ol^Ldl j^ 

-Uij .jsi^ ^ of Jn- i Litf ^ of oLU. dkJ ^ c ^^1 JJ-» Jj 

^^JL i iJL, f^J Cr^ ^ S?* ^-^ ^ J ^ °^ ' Jj ' "^ ^^ "**" 
4 jIip »J£* Li^ 01S lib • k»» f-^» u* «**" J ^J* W1 J V*^ 1 ^A 
fJ -.ji c fUUl oLtudl «jJi ijj^Jl * JjlJ+l W Cf & J SJjHi ^ U *■&** 
^ c bl» 4J>J> *AjM J"^ o-V"- ,iJ • Wj ^J-^ ' ^ — 

^ hn -■* oIjL«^ - 3.32 

^ uii^ ^ i iJ ^ ^ v> * te ^ d 1 ^ 3Ul ^ ^ ' IA3 

. jJl i >-! 

2LS" j ijL^»-l oUL»>- - 3.33 

Sk-l^, ( J c ) c^xts : lj>- JSf g*^ l^* c?f $ 0^' 0- 

BOX j> "i j*l+« ^ M * *!>*■ -*»* o- ^ ' "j^ ^ J 

. «J1 t Jenkinsj 

oLkAl ^j iJLu 0^. Ji c oNU-l JU J . jJI db ^ W^"« ^ o^- 

U^l -J> WJI *»* ' ^ > olikjdli S ^" ^ 
-My f 3 y oUidl >o t jU>. JS^. S3*W- OjSS of fr;jH\ ^ 

^ : 5 ^ oU^ ^ of ^ * c~> J^ ^ ^f 11 ^ . ^ 
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iJB^UJl oLk*ll £.L? - 4.1 
iijii- .^i jl^jj X, . 1970 Jl jj*. «£>lij i CODD Jl j^. t (.^1 II* 

. ^*JI ^ Jl L>" ^ ^1 t CODASYL oU-jJ ^ 

yb coll ^ ^^1 J^JI (.^ : iJUl oUi^ll ,>• CODD jlU 
oli%Jl « Isomorphe jf ( oli^Ul J J^j- fUii j\ aJjUj" 4J!)U» JaJy ) J.U^ 
oUa*JJ «l* ijk; jjjkj M Ms iU,y li^l . (n-airc)n i^-jJj wLjII 
. ( jJl t oiyi> t MEMBRE t SET ) CODASYL ^*U. jp Ulx v_ik£ 

. £\y$\ *j^- -j* CjIS^Ap «j*jf ,>• ilS^Jtw. 4PjAjfy> j^SStlUJI oUa*ll £»J? 

L^Lj ^i; L...lk.,. J J,l£ll ^l^^ll . cJjJ! v^ j4^ of «^ J^J •>? 



ljL-^- J-^U ,y \jJ£ ^U- J-S^ ^ Jt-J j$\ t v~£Jl oLkjJ.1 ^L>J. 
^ Jb U jUsJ J lijUx^-i J~*i-Jj . o-AjcAI ili-Vl v^jJ (prcdicats) oMja^JJ 

. ( Systems experts i Ji J~\ iJalVl » oVl 

iL^liiUl JL*u-i_4.2 
. UjjP jt iulkJl c~Jj J^bJl ^ oLJ^U vJL J^ JSVt ij^ 11 sl ^ 

.l& iku.1^ t j^l : (uuJbjj) ,jciL>- J&AJ i ( aJ^Ij OLJNl ) ^ \^ *i"^ 
. ( 8 JSli ) ij-JJl iiil ^SCjUjJjVI jwidlj t 4-SUJtl aJJJI i oUjLc 







i^ 



fc£* uJ 
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. 0>bJl Jp Ll^fl 
J_5Li* i-^JI SjLi^l jySi ^i, «. iTVl j>J jLJ^I -j* >-Vl .1^1 J 

«jL.jUI ol£~J >j^rj i_~~, t J.UJI jUl v— J^ 1 •/-^^ C- 3 -^ 1 

06j^1\ Jp 1 ol^Ul £jj! ^Jlj t dVl toj^y. ol^UJJ ii-y, Up ilL* 
J^.Sll j u* oLSLill oJLa . j^^^JJj is^L^- SXju a-JUjU. ol£«5 &*~>\y. 
c ( JLp ^jjj 1 USA «, ijU ) CYBERNET* «. TYMNET <. MARK III 
t ( lljjjjt 1 jj a . r ll ) EURONET i ( USA <. j j « « » 4J) ARPA 

. ( LJji 1 j^^JJ ) TRANSPAC 

oU^Ul JJyJ 5JL5LJI 1 gljJVl £*• y oL-U-l ^#i 1 (Serveurs) ^1 U 
ii>, ILa, ,^WJI J-JI jjJC i>U jl Up olsLi dby '. ol^yJli Stjjjllj 

' " * l * . l^ipf 

. J^Jl J 4A5«J **f?^ v'yj 

S.G.B.D oUw ^.l* Sjl^l i*laJi J V* 1 -^ V^ 
. ~*ldl .JlA. ^j^ Sk-I^ W^^ ^^>l ' S.G.B.D. J^ i^cJI JS^I 
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E. F CODD, A Relational Model of Data for Large Shared Data, 

Banks, Comm., ACM, VoL 1 3, N° 5 (June 1970). 
CODASYL, Report of the Codasyl Data Base Task Group, ACM 

(New York, 1971). 

C. DELOBEL et M. AD1BA, Bases de donnees et systemes relutionnels, 

Dunod, 1982. 

A. FLORY, Bases de donnees, conception et realisation, Economica 
(Paris, 1982). 

Ch. BERTHET, A. MESGUICH et B. NORM1ER, The problems of 
applying informations systems in organizations : communication 
between man and computer, Institut Europeen de Recherches et 
d'Etudes Superieures en Management, Bruxdles (1975). 

D. MARTIN, Bases de donnees : methodes pratiques stir maxi el mini-ordi- 

nateurs, Dunod-lnformalique, Paris, 1981. 

Repertoires de Banques de donnees : 
DIRECTORY OF ONLINE DATABASES, VoL 3, n° 3, Spring 1982, 
Cuadra associates, Santa-Monica, 1982. 

DATA BASES IN EUROPE 1982, Repertoire dcs Banques ct dcs scr- 
veurs europeens.connect6s au rfcscau Euroncl-Dianc, CC.Ii. Luxem- 
bourg, 198Z 

BASES ET BANQUES DE DONNEES ACCESSIBLES EN CONVER- 
SATIONAL EN FRANCE, Association Nationalc dc la Recherche 
Technique (ANRT), Paris, 1981. 

GUIDE THEMATIQUE DES BANQUES DE DONNEES FRAN- 
C.A1SES, Centre conformation dcs Banques dc donnees ct du Video- 
tex (CIBDVX Paris, 198Z 
. REPERTOIRE DES PRODUCTEURS DE BASES ET BANQUES DE 
DONNEES, Groupemenl Francais dcs Prtxluctcurs de Bases el 
Banques dc donnees (GFPBD), Paris, 1982. 

INTERACTIVE COMPUTING DIRECTORIES, Association or Time 
Sharing Users (ATSU), USA (annuel). 

Organismes assurant la promotion des systemes d 'information automa- 
tisms : 
MIDIST (Mission inlcrminislericllc dc devcloppcmcnt dc 1'inrormalion 

scicntifique el technique); 280, boulevard St-Gcrmain, 75007 Paris. 

T6L 550.32.50. 
PBMIST, ministerc de 1'Education nationalc; Direction dcs biblio- 

Ihcqucs, dcs musecs ct dc l'infprmation scicntifique ct technique, 

3, boulevard Pasleur, Paris 75015. T6L 539.25.75. 
ANRT (Association nationalc dc la recherche technique). 101, avenue 

Raymond-Poincare, 75116 Paris. Tel. 501 .72.27. 
CNIC (Centre national pom- l'lnformation chimiquc), 26. rue Boyer, 

75020 Paris. T6L 797.29.29. 
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CDST (Centre de documentation scientifique et technique du CNRS), 

26, rue Boyer, 75020 Paris. Tel. 358.35.59. 
GFPBD (Groupement francais des producteurs de banques de donnees) 

103, rue de Lille, 75007 Paris. Tel. 550.32.22. 
A DBS (Association des documentalistcs bibliothecaires specialises), 

5, avenue Franco-Russe, 75007 Paris. Tel. 555.55.16. 
CIBDV (Centre d'information des banques de donnees et du videotex), 

11. rue du Marchc-St-Honore, 75001 Paris. TeL 261.45.17. 

ATSU (Association of Time-Sharing Users), 75 Manhattan Drive, Boul- 
der Co, USA. 

legislation : 

LOI N» 78-17 DU 6 JANVIER 1978, relative a rinformatique, auxflchiers 

et mix liberies, Journal Officiel du 7 Janvier 1978, pp. 227 a 231. 

-I Decret 1V.-11A du 17-07-78 

•I Decret 78-1223 du 28-12-78 
I- DiUret 79-421 du 30-05-79 

+ Decret 79-1 160 du 28-12-79. 
RAPPORTS DO LA COMMISSION NATIONALS INFORMA- 

TIQUE GT LIBERTES (CNIL), a la Documentation Francaise 

(Paris). 

CNIL, 21, rue Suint-Guillaumc, 75007 Paris, TeL 544.40.65. 



58 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



^UUlJ^ooJl 



. ( II iS jl-a j, oUUl ) JijfcJl oUJj ( 1 6*~* *&m ->* ) « ^ oUJ J 

JUlM V-^jII ilt-jJI * ( m t5j^? oUJ ) .1* *PjJI oUJ cs^pf ^j 
oUl LlU ,y>Jb- ^ Sj^Vl oA* iu y i*j U^i OH^j . v-U-L fjjl>l 

■ ( V^ ) VJJ 1 j^ 

Jjijil SJJL; JiJUu" (if j- ]^f i-*-^ p. VJJ 1 ^ ^ VJ^ 1 ^M Ji^J 

. (assembler) 

: \fy, y. JU.cu-NI Sj^ AiJ 15 Jlj>- ilbbj * ( £)l c SIMSCRIPT c GPSS ) 

FORTRAN 1 ^s J| ^ljj olaJdU 
ALGOL J ' ^ " 

COBOL Sjb^U *^ 

lisp (*) cV" ^-1*1 

SNOBOL oU-Jl J-^L. iM*X 

PL/1 fc£»ll UJdl JL*Vl gJr 

. «SystfSmes cjlpcrls» J^l Uii V* V*>-M ^M* 11 VJ : •»■ L>** ^^ *-V ' JSP J 1 *^ (*) 
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FORTRAN d\yjj» - 1 

• ol r- U - 1 V^ f J* ^ JXj vJ-jJl i^Jl olaJdl J SaJLill 
tfr^l J oUo*illj oL-ljoJl ip^f 0j iJ c 1954 iu- J_,f ^^ 10 ^ 

: ^ i-Jjj IBM ob^JLI 4-1UJI 
Preliminary Report. Specification for the IBM Mathematical FORmula 
TRANslation, FORTRAN*. 

0L5j . FORTRAN II ; sjij^f tt^ yj ^ «. 1958 <L- Jj c LK* 

t -SUBROUTINE*) i^U g_^ Jl_«^i ^l_S^l ^ l_gJ JUjO-I 

. ( «FUNCTION» T , 
i IBM ^ • Jij ^[ -ju^^x. jU^[ «j ^^ ^jj| ^ jb j| t 1961 ^ ^ 

•^. j^ o Op ji^"" t5j>- i (Remington Rand UNI VAC) ^bSU J* jl^^i aJJU 
• iSj^ itt^CS ^a^ 1 ' **»^-l ^> lf^ J& olS"j t FORTRAN oU^ 
^JJ Oil*>cUw<JJ i_xi- J-iCi; t 1961 4_w jlil" J gj>- u aJU-I oJLa iA-L>d} 
<i~»- i olyjjj £JJ SXjO^- aJc^. £v»P t «SHARE FORTRAN commitee» 
jLiJl ^^ i cjpi ^ Jj . i^tf _ ip^jt J£j; ^l ^ ^ FORTRAN II 
aJjj olJU^j oU*»l^. Jp OjJ^ ^^ olS"j tIBM j FORTRAN in 

. (boolean) 
b\f>p <iU U,j»- H^p «STARE FORTRAN* i^ o^J «, 1962 i-, jj 

. FORTRAN IV i^JL j^ll ^J^J 

«Aiuuricain standard organisation)* r-iUJU i^j^Vl i>JUl cJK-i Jilj 
: LV o^J JUJUi ^^^ JLiJj . FORTRAN ^JLI ^l« ^J X3.4.3 ijJL 
a«~ a-Lu-I^ JjVl ^JJI ^ SJUidl FORTRAN U ~J J t JXll FORTRAN 

. (USA) SJb^ll oL"syi J goLdl 
. FORTRAN iil Oj^U->j uy«-w»ll a^ fjLj 1963 i— Jj 

FORTRAN iiU 4^1 ol _^Jtl 

: ^^JUJl i_jL-w»JLJ i)L>i» iL-»j a*UI »Aa ^ cJL>t>- {.-joLw JJ^ ill> 
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iJUl i-vJl "^ t (Formula-translation) i-JUl ^ai\ **■_? 



X X X 

% = 1 + sin (x + 1) 



& = Jb 1 - 4 ac 

Y = 1. + X + X**2/2. + X**3/6. 

+ X**5/24. 

Z = 1 . + SIN (X + 1 .) 

DfeLTA =.SQRT (B**2 - 4.*A*C) 

: iiL^^I LJ>[iJ\ ik£i\ ,y jLj^s ,y> jlyjji iil; £waJl »I* *»)£ 
olJb J*dl -jj. Jb-lj j* JjJbJl IJl» . ( oLJUJ iLU Jlzu jljSi ) DO iiU-l 
ibL-l**, i J-jiISoJI uL^i ^Vl iLJ^I ay i £-«~i y>j • 5J_Sl* J-S'Vl 

. idl i olijjwill 
^.I^JI oJLft . ( «SUBROUTINE» J «FUNCTION» ^J, ,y ) i^lill - g-l^l - 
jJL^ Ot -j&J Jk~* JSLij FORTRAN £.1^ ik-ljj iUju^ ^ i^Ull 

iljSl jjjlj AP^«j J*«J c iJUi ,jA olij-^ilj . *^iU *V- ^ o\jj J* **} 

oUv»Ijj? £u£ y* <. ^jJl cjLJ-I j JJL>- ^ aJJJI oi* cJtf lib ■ oU-UU 
4_^'^L. jJ> ojJU g^.1 j-. J-Ci, *b(l ) olLji J-^— U-Lm J ol Jj4_4j 
. oLtodl J ( kj~* ) ^j 1 <> iij^ "Jl ^ji niili la* U . ( JU*^J 
^ 4 ^jJl ^1 ^Li-I i ,y»U-l l#i*^J liU-| J*** jl, 1-iJ 
OjSj ot »_j2j 1 LjU SjJwJl ,js- <. oLSil *^- J* i Sj~5Jl oUajLl pj-tf; J*>l y 
. oL-U-l JUjou-L i_J>jj ,y»«-i J53 i^L-Vl oUjLJ.1 ,y L-i 

COBOL 6j>j&\ - 2 

Lfclp J~JI ^ ^Jlj j^l o^Jl oli JiLil J* Sjb^l oUl J>' 

Sjb^l oUl Ojfi 6t v£ IJJ i S^jSjU S/IJJI J Jiai Of -J^N Sj~£Jl o^>~Jl 

. o jjJai* £-lj>-i - Jl^ ! tP^>; "j-f^ 
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. l^ iilxd! oLL*Jlj oLkJil l^.^1 UJU jUifj oUS ^ iiJj* 

j>I d[ * J**.* 4 ^f ^t- ^j . ( 70% ^ JSf ) ijb^l J U* OK oL-LJ-l 
<JJ>-U i> A^JUll ^.Uji t oUjiJuJU ^.l;^ t "&, Sjb^l ^ ^Jpf j.juy 
^Vl il*- ^ o^o^Jl .i* . |^_. Jlj L. £jl . . . ( olwjxJil J^f o j> ) 
«)*-,_, LISUL 0j& Of v* c ilfJl Jj • *S1I AiJ J lr-j^ V3jI>I oUUI J 

. o^JJl iiJJl j, ij Jtff 0^1 Of Ji t ifjJI 
«0_* Jp SjIj^I oUJ jj^ki O^wwjII i_ik£ pis i ^^J| ^ jj Lys 

^.lii cJlSj ( 1955 t REMINGTON Rand UNIVAC & ) FLOW-MATIC- 

■jP Jfc-j c oLJaJ.1 i_iv«.^ (V ^Ju ij-^f j t ijJ^J^II XiJLJl -y tjj* 4iK 

cJjJl ,jJu J IfuiLve. Oj>-j (Air Force Air MAterial COmmand) AIMACO _ 

. UNIVAC 1105 Jpj IBM 705 Jp 
P^a* ^ ja c-iLUJl (COMmcrcial TRANslator, IBM, 1958) COMTRAN _ 
Vidl ) *^>IJ\ ^vJl U-UL i^U- oLlSUl Sj4^ ^^J ' FLOW-MATIC 
Jl oaf ^llj «IF ... TIIEN..» i_*^il olJbJU^Jl Jp i5js*) i ( Oljljji J 

Fully Automatic Compiling Technique, Minneapolis- Honey well ) FACT _ 

Regulator Co Data division, 1959) 
cM?j-kJ>j COBOL i*J t-~-j t 800 £53.1 ji- {£j>-\ &£• Jp UJLio ^j 1 

. iiJJl oJlA ^j^as*) L£jjN\ SjbMl 

Oj-pUJI J f-lijJl j»*J ^y c ( Charles. A. Philips jlif <, 1959 U*> J 

(Short, Intermediate el OLJL Wt y jy^ • x i-^ tSyr ^J ■ *£j^» s jl4 **$ 
Jp &yjJ. «Sliorl Range eommitlcc» JjVl i>JJl cJl^ . J**il long Range) 
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Rem— ngton- t RCA t Minneapolis-Hony well i IBM «, Burroughs olS^tJI 
o'yiS^jJlj i Sylvania Electric products t Rand Div. of sperry rand (Univac) 
De- -j* t David Taylor Model Basinj Air Material Command USAF v^" 1 

. partement of the Navy 

iiJUl Jp I^Ui^ c^ijj t 1959 o\y_y>- 23 j Sy JjV W^ 1 *^*»=^1 

1959 i»U J COBOL jf t «Common Business oriented langage» 

i NCR i General Electric t Control Data Corporation oLSj-iJI L*f 

. 1960 i- p- cJaJjl JO» t5j>-tj 
4^ 6 LiJl (vjj t (USAI X 3.3.3) 1963 i- J COBOL iil i^Ui ^j? JiJj 
(European ECMA i.jkJ.1 1**-*-^" J ^r^l -^j . COBOL-65 UU- ^J: 
(USA S-^ij*^ iiJJl JbJl^ ^^ Jlilj . Computer Monufacturer's Association) 
iJjjJl Jl iJLlI oUSai £*• cJISj . 1968 i- .J" J Standard X 3.23.1968) 
oUSll ) 4LU1I SaLtJl oNU-l jAiu J ^i i COBOL ^J^. ^ ,JlJ i^.^l 

. ( ^Lo t JvOaII eijJl J J-jJJ iPjwall 

olkJ.1 j,... -.2,7 . A; ji£Vl iilll ^ V.J* V^J * •r^* V* ^Ip ^"^ " UUI 

i_JJJ «FUNCnON» ^dl J ) oMlJLJl J_* COBOL *JJ iij-^ N 
c ^-tf £^. ^ftj JjIjlU J SWIS j» JftoU ^Ml ^Ij • ( FORTRAN 

IF A IS GREATER THAN B GO TO 

PARAGRAPH-3. 

JL'UjJl -yi ^ tt $y-l AiJ ^t J SayjU ^ 1 PERFORM if^jj 

. Wit 

63 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



(Divi- J*juU 4-bll oUjUll y j£ J 1^ UI4— 1 COBOL ttJ oJU* joJj 

. sion Environnement) 

.a« if jj| «jj . 5-^ ^ o*>U~Jl U.U,j ^^k; oLJl£»l jU t il^l Jj 
iLU- L^i djSi ^J| <JLL| Jj t Sj ^| o^jU-JI iLU. JJL-, J iJUiJl sjbJLi ^ 

•^ 5X1* /llU jjSL^j . Jjj -ut [f&j t jLi. Sjbl Ja^j ^ JyjS 4k] jls IJJ 

. UIp- iiUjLdl oU ^ Jviif JS^, iL&,j sjl, •«». t Sjb^J ^^.f ivL I^Ljl; 

BASIC - 3 

J t tiLj_^Jl Jlj^- oA_pL»t 1 Kurtzj Kemeny S JLlL-Vl iilll oJl* -•,,/* 
•r^w iwl_>- ^j t SJbJ.1 oL/iljJl <j (Darmouth College) r-^jZ <liy>j\* 
^w— : t <_/5UaU ik-«j hj^ ikJ »j ■*£; L^i*^> cJlSj . ijUjl*ll Jjb- J «jj^L» 
(Honinners All pur- BASIC iiJUl .- (lime sharing) .JLaLl cijJl J 4^11 pjL .U 
Cili <u£ll Jp- I yM- 1 i~. J JjVl Sj*U ciiuil pose symbolic Instruction code) 

£_* i~.l_~o!l ^IXxJl ^jJb ^LajCL-J ilwJ- t JlyjjS AiJ -j* ijji 4jJ ^j . 225 

J£a I JUL . . JaM aJI jijkJl cJLltf iJL^s- 1 .^-Isll cijlL *^y J»s . ^k.....7 
Kj^J 1 j-Ual.1 £_*lJ^_J ik^-j ^-L*Jf f**-* J jkvJJ -»ijj IJLJ BASIC 4*JUj 

SjljJ J iljf-Jl Nj 1 ^UM ^^JaJl J2J-I iiiJl oiA jjS^ N of ^,-JLll ,y.j 
Mjj <. FORTRAN iJ Jjij SjJLi U> ^j . COBOL 4iJ J \5 o">U»Jl j^JiJj 
£~*aJl j ^j/a^l Jaj ) if jJl j*JLci tJUJ SJL?- iJ Lp53j . PL/ 1 ikl 0UK4 
■u^j^Jl jjJaXlLi JaJy> jA (jU-l Iftjjlajj . Jjw-I IJL* j jj*- oLoJb 1 - fJl&j ( i*_unjll 
t L»*J^9 J . jJij ;r «jjSjj^J l ,l CjL£* h**; (Jp *iJijjlj JL>kj I 4~^*JJl ^Uji>t»JJ 

ijj^Jl 5jl3j ^ i_JJaj 1 1^71 iLy. j J. Ilcbenstrcit i_s^p t ij-JLdl c^liJadJj 
( I .;iiif,;ir. c Symboliquc LSL ^JLJ vJ|JL_jjL_j -j_» i—jj-J i_J«J 1 i. . / . . W 3-JI 
j^Jb 1 j»JL»cdJ iLj— jyj c v-'j* *l?*Jf ^^ **^' J*j«x»«; . d'Enseignement) 
i_jLJ-I -ji iJLj 1 t_jli^ -LSjOj oliLJalll ,v» j*«5 jJIp if j-j jm-. jj : r^fiy i£i 

^ t vJjjjL iiK^ . JjiLl ^ik^ J *JLiciJ sjlaLJLI j^IjJI Jl ( _ J SL-^JI .^JUJI 



(piii|>iiiiiiiniilicinaui»-l'AI ; *iilll : i~^/ ^i^Vf- J-UtiiJJjIol Jl^iJ o' "-^ us^^'j j 1 - 1 (*) 

. 1958 1- J CAB 5(K) Jp matiquc des formulcs) 

(A 
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JL*!^! SiJbdi! cAiJUl - 4 

System Development Corporation du stra- : JS^-iJl oLtjf t 1959 i— J 
(Internal Algebric IAL 4_jJU L«— -j_J tegie Air Command Control System. 
If. j»^il ^^.JJI ^ J_p oLK ^«jf AJa^t^j t JOVIAL ^Jb language) 
tjj^- . (Jules (Schwartz) own Version of the international Algebric langauge) 

if jJl &J -j&j . ilili^all J} dUi « OiiJJ l^j t oUSC SJLp Jp &JJI oJLfc JLij 

. PL / 1 iiJ ,y» iJ"f JtsVlj JLjc^/I Sj Jbcdl 

PL / 1 iftjJl a*J 
o}U<-Jl aJ^Lmj t oU-Jl ,Li!>L< ii-U* j ii'jbj* **J *i^ r*** "r f— iJ 
«SHARE FORTRAN Committe* fc»Dl cJ-CS c & jJ-l oljiVl g JpUJIj 
«Advanced language Develope- oUJUl jjjld iJL i 1964 *t~- J « IBM iS^j 
of iijU ,J JOVIAL i COBOL i ALGOL oUJJI c~-_p mcnt committe» 
U **J\ . iiLat J*i oljj 1964 i— JjVl \*yJS jttf JlaJj . IA JJL£ *l^>-lj ^ 
J-*i#l oLi^.ljJ.1 ^JJ oJtf jJl oUJJl «iA JJUdl f^ill 44JL t Ijbr otf 
Uyu, ^JjJ OlSj : S-- «i^f> ' COBOL i ALGOL t FORTRAN oUU 

. ixJbA I Ka -jj SJULiJl 

(New Programming Language) NPL ^Nl Jp JJb JbLl &JJI cJLaa- JUiJj 
ilji j L^p oLJ >-j yj *jJ15j *i ^j c L^JLff- iif^jJuu o.Ap *Ij^-1 t5j?- >iJUi -buj 
. (Programming language Number 1) PL/ I ^S)l\ jUsMj ,_j^1j t 1964 

ilMj*A\ iplXs<» CJlS" t fj^jlb i^jji -^p *^s oU-U-l ie-lw' Cot? 1,JUj 
^VjJI J jji" *»Ul cJlS" L^-o IBM olj~£ jj t LJlk.^ J Ilurslcy J jlk: 

. 3 Ji>»xLI 

lift J^U . 1906 1- v Tj lj*U- jl? ( PL/ 1- F- 36(), IBM) J,Vl ui^all 

■i>Uulj J*P tJji jjtibj 4 PL/ 1 &L OjaXc ^v**vedl ,_ji~ 6l£ t cJ.pl 

. *^sUSv« Jp iilJl ljLj^j ilS^L* lij>-Jkuj 

6|» i UJJI JLJbo ^wj . J>lS" ^1>J ^f ^JOB j. oli^uJJ JjVl A^JI 

. SJUiJl iLlS bljS'f ^jj piu, J**J c-JlS 1 oli^-^il 

V ^ . PL/ 1 JpolS^ JS^ l^£- ^JJI OiU^Jil ,ywj JL* olSj 
<^>^i - 1 * lc-*rf *H* ^J& L>f u^€ "i^l • &JW »-i* <-i^4>y JUJJl uo MM *_-^ 
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. SX>- cJlS" (Hursly) PL / 1- F- 360 ^./ijt i~\J\ ik~#l\ ^j 
\*y \>j$ jJj-jj, <. s/IJUl J Ijjc^. UI&. JU>-t;j i a-Pj-j *i <Jhj^i\ 

If «. jjjll JjS3l iJlxS -y> Jbjjj OU-JI J--"^ it-Uui J i*$* oJbJb>- OlL^>l j* aJ 

■ ^Ji^J &\yjy *&jw ^pij ^>j^ PL/ 1 4*1 Jj*£ 
A-j-JL, .iJLJJtf i^jAi iV-JL 1,5 t J^»JL. JSLSo ill«j .y. SJU-1 oli^all 
<. 1%6 i^. j iJ-UJlj t PL/ 1 i»Ji] iwAJ.1 oIjjvjJIj i aJjil 3j1nJI iJLaiV 

jJ> iJLftj c oL5yJlj JjlJbJJ U^ aJ^UjC LJb- 7«*w PL/ 1 AjJ JaJJ 

. COBOL iiL ^Vl <>j FORTRAN iiJ J -jSO: 

■ Jjl^'j oliyl^JJ Ja~. f "-VUjC dAJJJ 
Jj-ijll oYv->dl /»UaJ 4ja_w-lj_j «Jiyj ik_-*j aJ^LkjC UojI 7 c -»— J ^J 

. J~.%J\ U-U. ^ iLSai vjjl>-l S-^ 1 i^ 1 t^J («BASED») 
i ALGOL i~Sy l^U t pJWlj iojdJ JvaiVl iiJJl ^-/rf ^ V'ljJlj M^l 

. oL-U-l i^U, Jp ^ jjlfc U olS Jali PL/ I ^ Jr L. il-X; J^j i 0^1 
i AI.CiOL t FORTRAN Sj^rjll i^-L-Vl oUJJl lU-L; 0t L^ IrlSULjj 

. COBOL 

£. JU-I y» li*j . i^Ui PL/ 1 olij-^. pJl Ojj-L-Vl JjaIvoU tj^j~j 

. Uil UNIVACj BULL ^ LtAJaS> fflM 

ADA -5 
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i^Jl j4J t S.j> t JJ^> fcl jytl Jl 1*1-*= 1975 £- J ( dod p — all ) 

Jilb^l ^j * ^UjJI ijljj Jl UjP 17 Jl*- p-L-l c5^r 1977 *- JJ 
CII- i SRI International i Softech t Intcrmetrics •_,— » ) L_r-^ «—"— >.J->. 
5j£U «jiiil SJUaJLl iilJl o JU> . S^Vl jL^l 6J* kW Jj ■ ( Honeywell-Bull 
l^ o J**L. t CII Honeywell- Bull f\j>\ & ^A-f JS^ l^j* ^j^ u^J-^iJ* 
Au- ^jfll cj^ Jp c ADA V^-; ^ ^J •-# ->J^ Hcnrv ,cd 8 ard 
^JUL JjLi 5iJU*j Lord Byron ^jJ&Nl y>LSJl **! * gusta Ada Lovelace 
ajJ-l U-jJy&JU Lf r-JuL jl* lil i . tfLb*. okljl ^ l (Charles Babbage) 
ioVl ) j* Ada Lovelace Oli t (Henri Ledgard) jisytf ^^ J** i diL-U-l J 
. J AliUJl v^y^ j~*J of -jSCtj t Great lady of Computers (jj^jZU 5^-531 
: y»L J^-»< IA OjSw- i jl£jNl i*— I^JI t i>JJl aJl* oj JjAJ of ^JUl -j^j 
Jp j>lM Jl ifU-l Of Jl SUi . V=li* v^i ^ J*^ <> ^ lJu * s3 
J SijJbLl A^jkUll-J SjjjLl ^ JLiu-J ADA j Ujjjv» t^v' *fj^' • J '- a J j^^* 



J. ARSAC, La construction de programmes structures, Dunod-Inlbrma- 

tiquc, Paris, Nouvcau liragc 1981. 
J. ARSAC, Premieres leeons de programmaiion, Cedic-Nalhan, Paris, 1980. 
H. F. LEDGARD, Proverhes de programmation, (raduils ct annolcs par 

J. ARSAC, Dunod-Informalique, Paris, Nouvcau liragc 1981. 

Pour le langage ADA : 

H. F. LEDGARD cl RAPPORT ADA, ADA. mi Introiluctioir, ADA 

Reference Manual (July 1980), Springer Vcrlag (New York, 1981). 

D. LE VERRAND, Le langage ADA, munuel devaluation , Dunod, 1982. 
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^^l—Jl Jl-mmJI 



FORTRAN 

4jJJl ru+p\y> - 1 

oU-Jl 4Pj*f - 1.1 
J***' £]./»" jf(blanc) (j^LJl J^xu-j. : i«— 48 ,y.APj*sft i>l>uy **J J*-*^ 
ik-iljj olpl^iJl Jun^s IJlSvA . J^asl oelji (Jp { U a * t " <_j^ «■ i*JUJl jjks- ujibst 

LaLLxu-I lilj <. l^Ujt; V J oUKll Jl olilyJl J^jJ of jSLd\ ,y . ( oL-Jl 

: iJtJl oLb£Jli \JJ. 
GO 10 1543 
60T0 1543 

• z Jl A 0* ' *L«JVl ,y -jj^pj iiJl ijjS-Vl ^j t iJl>vf oU— Lajf ^Jjj 
,y oli^ll ^ ^ ^/ Ua -^j t (Majuscule) Sj-SJl JlSUVl J Silp Ji*3, 

• *js$ Jl Vd^J ojJwJI i_jy-Vl JLilrfl 

Jliftl iSV^f Jj t 0.SCAR ^ t t , .../,; ^. o ^ijj-l ji/ 1 u> J 

. 1500.25:*^ v^r-^'J^^'O"^ 1 .** 
oU,lWl v-lpf J >*Jlj O o>l JO J &ja ^ ^ V t IJU ^ 

JUl J£J| Jp ^LJ| jj/ V USJ| I i* Jj 

. 9 Jl o j, t ayuJl ^i f iijVi ^ flij\ll 
: <JLdl oUJI ^ : i^UM oUJI 
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«Star» i*»«j # 
«Slash» i»— 5 «--~i«S / 

ikii . 

«Guote» '-ijj^ji) ' 

i^ll jj . A JpJiII J oU-Jl o.U J>-IjJI J-i-Jl i«rl^ '■iSpb u* jrjt 

. EBCDICj ASCn 

^StS ) (cnticr) c? >^> yJI : ^jJl J~^l <y ^ ^-f ^ ^~' 

■ ( o- { J £r* -jf ) ^^* L> Jlj < ^ 

2I474K3 JaU; ^ j^ill wll *i*» c ( obUL tSU ) n = 32 Otf &1 «. ** 

. 647 

12 

- 257 



+ 126278 

~ 8334 

" ^ . aJUll 
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3 

. *£j>£* aL^Hj ColjlJl . 
tjcil^ (jCojjiaj Ooljill oJLa ' . -"Cr 
JjVl J5UI 



18.53 
257.01 

1. 
-12. 



0.1853E+02 

- 0.25701E+03 
1 -0E00 

- 120.0E-01 

t j&l\ Jp CjyJj & iJilkj £s*i^ xXt^jA ^-Vl . ( ,jJ j\ IjZ* Zy t ^>J E 

. JjVl JSULj 4*^u oUJ t^ ^^UJI *jJL| . () jf ^ <, ^l£j 

*>-jzy 4J Ojj iSy»o» iJUtfUi CjI^I _ r- 
. iikfc C~J ib£Jlj . 4-aJoJ-I jlJloVl am SjL, j -_*xJl -j* 

: JjVl jSLiJl 

2.718281828 

- 15.0023580132 

: jWl J£jJI 

2.718281828 D 

- 1 .50023580132 D + 01 

ul-ij ,y tJJt £>w, ^ ■** y, ( i^ - t yb\ j ^Vl U.I dU-l oa**Jj . H L_i>l 
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. AjSkll cJjill _ 1.22 

= fauxl Lli , J „ true = vrai = £LJb- , ^ 0j& jf -j^M Ukll oliJl 

. i FALSE 

« vrai » .TRUE. 
« faux » .FALSE. 

iiJUsoVl C-iljtll _ 1.23 
J-**- <J' ife <-±jA\ £y i_wj . iUsi.it oU-Jl J-^U -y> SjLp ^j 

<j j^iJ <• oU-Jl *LA~, Jjt ^j* n ii^>- t nH *-9j*ll» L^LjU : <joik£ Oi^j^ 

' ABCDEFGH" 
• A01+2-/3AZ' 
•JEAN-PIERRE' 
•ALPHA BETA' 
10HABCD1234YZ 
2HbA 

.(^IjJ/b) 

Dr ^ij-i J-p FORTRAN ^ Ak—I^ H jL^-1 ^^^ : 3lb-^L. 

. IBMifj-S J iyiiU.olilLJl £_^£ t Holoreith 

4^>l cJjill - 1.24 

(12.544,24.012) c~"'r J = 12.544 

^j^ =24.012 

(0.1,-27.33) j^H = -1 

^r-i = 27.33 

( . , . ) r***~* i"""* 

72 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„l.' 1 1. 1 l .l .lll .'.l., i|. '. II l.l.Tl 



cflydi _ 1.3 
it£3l OpIjS - 1.31 
6 -j* aJUL. ( jp SjLp y» j^-'yi la* o\yjyi\ iiJ Jj . Lf*—lj i]j>«J.I i-i^I 

■ ^ 

ALPHA 
Z001 
KILO etc... 

(Variables Scalaires) t#>ry ^Jl cAjxA\ - 1.32 

IA j*«4 jL ^^ ^iljJl Jb-f j JsVl Jp JJ>-lj $ ilj?^. JLjol-1 iJLp 

' iff" 



. I, J, K, L, M, N : ja lfr—1 p JjVl J>l Otf lij 

. I, J, K, L, M, N ^ i_ALai ,^-Vl ,>. JjVl ui>l 01^ lil 

(explicit declaration) 4-J^H ^^^^l - *-" 

JU^ljJtlf -jP 4jL,ajf IA i bJj>-jj» 0j5i UJLLp i ( 4tcv?Ii})I ) AjbL| ol^^valil 

ol "« J olatjvidl oJlA *-*>«Xj fjij t pU JSLSjj . o^jJ.1 0*ilj»»iJil jf iJj>dl 

INTEGER lisle : ^*JI 
ik^iljj Ifveuu *jp iJ^oi* «, oM_p«dl p^L ia^J'il -jp SjLp ^ listc i±~>- 

. SJb-lj ilj?«i* j Jjit C)f *pS^i\ oiA -jSLc , J^lji 

INTEGER ALPHA, Z001 : ^* 
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REAL liste . „ 

. jo ../ITU 

DOUBLE PRECISION liste • ^\ 

COMPLEX liste . Cjvd| 

LOGICAL liste . " ^ 

o^j^dil ilul _ 1.33 

a^~ J iP^ 7 j>- ANSI jljjjjj Jj t s^Jl ( J ij JJ ^jf l^j ^^ 

. ( o^U-l 

: DIMENSION yM\ Sk-lj; 4 JJ^ulJ tlfcll ^f Ji t ^j 
DIMENSION liste : «^| 

DIMENSION ALPHA (10,25) : 1 *- 

U± 4_JiJu~ iij^u 10 x 25 = 250 y J,j>- y> SjU li[ ^ ALPHA 
j5>y\ \L~>- t. y j-ij- til **^1 lfr»—l *la-'lji *f> ~Ay>^j> JS Jjj fjL . ik-«i 
. 25j I j| J^Vl jji jWlj t 10j 1 jIOpVI Oy ij^-j- ( JjVl JJjJl ) JjVl 
DJ_MJNSipJ! X(100), K<1000) ; 2 ^ Ji, 

( • x *"'-» ./^>f ) -^'j -Wi <• Vi 2 *- *Jj»»-> 100 ,y Jj-A»- -y> SjLp ^ X 

PJMENS.I0N TAB(30,30,5>, M<10,10> : 3 Ji- 

. fy>^.\j *}j>cj> 45 y t-iJtjj i ilut 5^Sj JjJbj- t y> «jU> ■>* TAB 
. 4j_p^u KM) y t_ijtjj i ^jjJLiijj JjJU>- y- SjUp ja M 

J-u. ol v^ i iJU-l »Jl* J . . . «J| t REAL <. INTEGER Ji. ol^ wdl 

. JUJl y- L^^* 1 fj^' u* «/vaJI 
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LOGICAL AIG : ^ 

DIMENSION AIG<250) 

LOGICAL AIG(250) . : ^* 

v + c ( £jU + ilj>«i» ) 

( iij>aj> x ijtf ) 

v - c 

c*v 

c#v + c 

c#v -6 

. JL>- JSvJj AJyd.1 i^nj^iviJl c/^puLl JUjiIoiiJ j ~/2»Jj 01 ■j^uVI 

.. iS>^l ijf jJl oUJ JLIpI j ^jjt l> ^^ Jpj i FORTRAN Jj 
olj_i> «_~«>- i/IJUl J c^' JjlaJ^I uls c PL/ lj COBOL j JL.Jb>«JL.j 
. j*% 4Xc j-^J KT JjJbU i •>&. t laSok . jLJl j» jjJ3 ( indicc JSMjJI ) 

DIMENSION KT(5, 3) 

: JbJlJ^iJl Jp^J-J 

KT(1,1) KT(2,1) KT(3,1) KT(4,1) KT(5.1) KT(1,2) K.T(2,2) 
KT(3,2) KT(4,2) KT(5,2) KT(1, 3) clc... 

JJ* JjIjULI jf (scalar) L^LA[ "M oVj-^J.1 jIjlpJj j^jIvoj -^UII ^ 

. DATA j»Vl ,y> yJl IJLL JjuOlJ . i_jL j^aJl 

: JUI j* DATA ^bU r UJl J£JI 

c/i/pdil ^o'l^J _ Listc 1, List 2 
. oVp«idJ i>-juil CjIjSJIj i>«jM „ Listc de constantes 
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DATA X,Y,Z/0.1 ,25.7,1 ./ : 1 Jl* 

. 1 Jl Zj 25.7 oliJl Jl Yj 0.1 Jl X il J *A\ *\J*[ ^ <. I i£» 

DIMENSION K(100) : 2 Ji* 

DATA K/50*0, 25*2, 25*1/ 

25 Jlj 4 jiso (jA JjMl u^~»i-l ,,-JiJl : Jj»^L psj^wJl Jj-kM Jj«jj * cjM: 

. jljSodJj-U^y. I^j fj~» ( "5L. )50 jJLJl . 1 j» Sj^l 25 Jtj2 ^ aJUI 
^b* cil^ v.-Jjj /»Uai j-J Oxi Of v^r ' J 5 ^ 3 SJL *- ij* Jj^ -alJ*-! &*- J 

DIMENSION KT(5,3) : 3 Ji* 

DATA KT/3*0,12*1/ 

:. I Jilu" U\J\j ,_,* KT(3, 1) t KT(2, 1) i KT^^^bJli t IJ£* 



LOGICAL CI ,C2 

DATA C1 ,C2/. TRUE. , .FALSE./ 



4^ 



UJl^ljf.1.4 

•yi oJU£ iJUx* . -Lj t ijJbJ ol_*K ^ SjLp ,_jA iJiUl yiljt ju-^ 

...iJUDOi IF i STOP i GOTO <, ^ «. li£* . oLUJl 

. iv^U ol»~. &i~*\j> oLtwil U-Lw oLU Jl iiU»l 
t ^L5 Ulwcu-I "oSUl j-j . &>* jsp ^ F9RTRAN Sil oUK Uf 

sjip -^ >Jl iJla ^Jta . >u- JJ Jp sj^-Ij i~U* <jLhj> ^ J v^ 



A 



?. 3 4 5 



7 8 9 10 72 



^Uiidl 



j==- 



73 74 75 76 77 78 79 80 



^Ui^il j? 
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Jp jj>jll U 4l\ J.15 . C ^J-\ Jp ^Ua^l JUp tSjf; Of • J £c 1 ^Ul 

. iJ^pflll 4k*«ljj Jm^juij SJas-%1 j-I*j jt "jS^ isllaJl 

OjJLi gU[ t j^>w ( *ij ) jJLp ijtSo (j^l*- ( 1-5 %^j ) 2- 5 j^ jj»LJl. 

J »ij?-j-« iiki a**- Jp iSy^z 0l£ lij_j . pjli f Ip J^w; y> 6 <*ij :yl»Jl 

. JjUI jkJJ but j~~ 7-72 SJU^Vl J ij»-jll ,yiJl» t Jj^UJl I JU» 

. iftJLcll jwdj 4jl^3 LjtuJ 7-72 SJUjfrVl 
LAUjcJ t lojf lij LI&.L i -j5J, . LJ^oll ik-l^ 73-80 SJUpMI ^ 

. oliUaJl (t-JjJ 

j JjJb«dl»j t |H> Jill cijJL; iJa^Vl iJl»- J iibfe 0j5j Of ,j£? ^'j^-l • J* 
fjLiJl c « <%ij s yJ~\ JL>«J oVU-l c-Jpf Jj . iLJLJl :>y»L«j jJL>cj U J_J 

tujLoZj i-Pj^J.1 t o U JLull /y» iLJLu 'jp OjLp *A (1)1 J) »9 **-1j ?c*lj dl 

j_>J if>jj> ^ i»JLjcJl oJl» iijjj-l jj . END ^ pwlj^l -yi Sjj^-Vl ioJUJl 
. END fjj -j* yljL Uauf ^^TJ Lg-^iJ ^ybj . iuLj jf ijJlill p«ljJJ 

l-Ajf JJUS V, g«lijJl XiJ iU JJ c-jU JSLiu Jjjls:. ,y> ( I'ORMAT oUXdl 
IJLa iJjJb Of FORTRAN iiJ iiill J ^.^11 Jp ^ t \ji . JLi^Jl | jl« J^jU- 
oJll jjp JUjcu-^I ^jbu t UIp i bJlSClij . £*UjJl iUS' Xp aJ^Ij J f^fill 

: ili.f = j^l ikJ^, JjLJI i»JUj J[ Oljljj^l iO j ^ 



X = 12.5 

K = J*L-1 .. £JI 
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. jUJl Jl t <_i oAl ijj>ai ^ ^ ^^tsj ^ Jl i yu&j t itui wJl Jjj£ 

: Sb.f 

X = 12.337 
M = X 
X = M 

X iJj^cll Jl i oLgNl iJLiU t 12.337 i-^l JiJ (1) i*Jbdl 
* f s * 

o J* . ( M -jP Uaj| "^Ij t X -jP 7w»lj 7Sj-^u ij>-J /*>Ap ^j^iJ ) Uajf l^ai~\ 

. Jij* i±** J Jl ^sji V (1) iJLdl 

* X i*J JjOJ Jl t £p.->w>Jl Jl ^yliM ,>• Jj^ £> i tfjJJ (2) iLJLdl 
i*JUl i_^L t $Ul t M J Jb-j~« ?^>wall »-~iJl Jaii . M a*JL i 12.337 ,_/>j 

. 12^^?^! 

^f i M *ij>A\ i»J <. JLJb- J| ^cjpwJI jJL*Jl Jjyi « i JiJ (3) i-Jbdl 

. 12 mJLLU i»Ji]| j^l Jb^b ^Jl i X Jl i 12 

ii-l oLUJl - 5 
i^l oljJjll _ 5.1 
: iJlxll ^ (arithmetic operations) i^JM olyjll 

~JL.| + 
C >JI- 

Ju~Ji]| / 
. ■_; pjij- * * 



ili.f 



X + Y Y«X^f 

K - 1 .1 ^U K J^JI 

ALPHA * 3.5 3.5 ^ ALPHA ^j^ i>~? 

GAMMA/5.1 5.1 Jp GAMMA 5^-i 

X1 ** K . KiyuXl 

<Jj^>A\ ciol^illj oVj>Jil •>• SLXJl i^f 4 ^jJLl jjodl i J-^sll Jj 
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jj-ij Oj5J of <_j£ coljillj o^j>«dl : LjU«x* 0j5o of »_*£ «■ ^yj* "^^y. 

... pjl i 4-Syi jf t *£j>£a iLtfli jl t i>^>x-^ i A-PjJI 
jli i iJU-l oi* J . f lyVl oJlA JaU- JJJ Oli^vall 4-ltf Ojfi «, l-> : ... ; j 

. oUw U ^f . jSHS ajjJI fAi* jJl oliJl jf 4jj>«dl £j> J p" j^Jl **J il~>- 

. aLj^j 4*JU ^ytJbl-l <j JaWU jl 
. ^>wJl J JaUJl jf 

. SJb-lj i«Ji JLj«j iMa ,}£ 1 gjfrjiM 
ijJL-lo^lJLJl-5.21 

. COMPLEX J DOUBLE PRECISION ^y j, r \ J 

: iii-f 
SQRT X-j* ^ywji-jJ^- 

EXP(Z-1.5> Z-l.5^.J*lb 

SIN(15.*A) \5.*A< r ^ r 

• ^JJJ* <-&j*Si *Pjv»jl.! JL*-ij]l V-iljjJl CjVIjJIj i'J'il UjIku 1 Jj-^-l 

(JLI jJl lilbj . ( COS, COSH lap U ) ISy, ,y> C uijA-L l^*-l f JU ^Jl oMlaJl 
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SjJt l~A, J\ JljjJl _ l Jjj*. 





aiJlt ^idl 


C/» 


SORT(X) 


^CfiSZJJ^r 


i/J*- 


DSQRT(X) 


x u A ifajj** 


hrjzySs 


CSQRT(X) 


x u" <J*.s J^r 


<ySjA 


ALOCi (X) 


x O*-ff^riJ^ 


JV*~ 


DLOG (X) 


Xc^Jtfkj^tejl 


IsrjiJA 4*3 


CLOC. (X) 


Xu^-tf^riJ 1 ^ 


V*/ 1 


LOCI 10 (X) 


X ,>• cSj-^ f^J** ■P 




EXP (X) 


" e x v-^'^ 


l/j^ 


SIN (X) 


(Radians) X >_~>- 


JV»- 


SIND (X) 


(ob^X^ 


J**- 


COS (X) 


( olr >i ) X 4*sJl «_->■ 


J&* 


ATAN (X) 


Xj^aJ 


J/V°- 


SINII(X) 


X tf *Aul.l i/SJllj «^-s>- 


s s 2 s Js - 


COSH(x) 


X & £A\ tf-iSlj f uji v^" 


x/&- 


RAND(X) 


UljJi-Jl ilJip^l JlJ^. 


i/h*>- 


KRI'(X) 


Q^4]b 


,/s*- 


CBRT(X) 


U«X> _)•*>" 


yft^ 


. , \..0 »"..JlI OjArOAU 


I <S jXd SjaU-I i^LJI cNlJdl a^N : 


Sla>-5l. 



i.J^-lo^b.5.22 
: SJCetill 

iJixJi juxu-i j^Jd ^ 6j£~-j aJj>^ Ul r^ 1 ,ii * Cr* ot ^ *^* 
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i. JL^JJ v»-Sjll JljJJl - 2 |»3 j Jj^r 






ABS(X) olk»4*J ^,2^ y^^ 

IABS (X) Silk* i»J 7^*0 Ff** 

FLOAT(X) Ju^ Jl £*-/> cy Jii^ J**** •Z* 5 ^ 

ifix(x) j^ Jl «/A- «>• Jy* l^ £^ 

REAL(X) t^y. J-Ap ■>• JLA*- ^ ^y. Ju*>- 

aimag(x) v^r ^ jy afj r~* ^^ h? 5 ^ 

INT (X) JLap- J-^ 0" Cr 5 *""** (•—* i/ 5 **" Cr*^ 

AINT(X) <yV*>- j» £>w p-5 ^feS*- ^^ji^ 

SIGN (X) ■ (0 jl - 1 c+ 1 ) SjLSNl JUiu <yL*>- ylb- 

AMAX0(X,Y,...) ^Vl J-Ull JUu £f~* J^ 

AMAX1(X,Y,...) jjrtl J*U1I Js« ySJ*. Juto- 

MAX0(X,Y,..) jjSVl J*Utl JUu ^»w ^^ 

MAX1(X,Y,..) jjSVl J*ULI JUu ^jSJ*- £s»w 

AMINO (X,'Y,...) j*fi\ J-Ull Ju« j^. ^j^ 

MOD(X.Y) Y Jp X 4—5 ,y. JUI ^^ JLi>- 

AMOD(X,Y) YjpXi—i^jUl £^» t;f SJb- 



^^ IJJ J_«»jilJkl k_i^all i-PjJ jJUi LlA ivijyu.1 AaJijUl : ib»-^l» 

4JUai^llJlPljS>5.3 
o^lJlJlol J J>4 i jJjL5.31 

; 4JUI oLyjVl J* iUiUJ.1 *j> t u!;*J\ y>*j jL-Jl ^y CjLLJ-I 

. dljdl «_JLi> (1) 
(exponcnlicl) i^-t (2) 
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^=JI .I*.(Y/ Z) JjVl i^iJl uJ dJUi ju, . Vjf SQRT aJIjJI ill 
^^ :i ^* p »L*-lj p* villi a« . 3 pij V>>- *»«^ J*c*j 3.5 Jp p^jB JLSjJLl 
J (4) v'>M i^dl c >j ( 5 ) J^Vl f^UU^Li . SQRT V L^ *>^ *Z 

■ (5) <*~JI 
a_UVIJUxu-I_5.32 

. *iljf JUfc ^Jl ^ JLUb jS?l iU^I _ v 

:^ 

((X + Y)/(Z/3.5 - Z)> * SQRT(X1) 
((X I Y)/(Z/3.5 ■- Z» x SQRT(X1) 

©__ 
© 
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+ Y)^uLdl Jljdl Jp ^J- dJUi JU, . %\ ill Jl Jill <. JiUl Jill J |^j 

•j- 2 Cj ky Vjf i^iJl v-^i c lj^i\ aJULI J . (Z / 3.5 - Z) dUi .A~, c (X 

»3j 4J>U i>wJl Jp 2 »Sj SJji-l ij^Jl p — AS tiAJi Jbuj . i>~>«ll i—aJl i>^ 

. SQRT i-iLJ-I a>«^j aj^ i^JJl i 4 j»ij ir.-dl Jp J-a^ . 3 

3 .ah :M oULJlj ijUilil oLLp : JLJikll oULJl ,>. tjtSJ* ilU» 

. v-L-Vl 

. i FALSE .Up »j « TRUE iiJfe- i 

^jULloljJ>_6.1 
. AJjllJU iJtkll *L$ll oULp j>-jj 3 *ij Jj-A^-I 
. iki; ik-ljj ii^w. oljijjj ^ J «>* ^i^kil oljJjli £*• : ili>-^U 

SJjUuJU iak-. oljt> _ 3 JjjULi 



J*> 


w 


■*u ' 


i*J 


.EQ. 


iHu 


A.EQ.B 


A = B lil 4iJi>- 


<y>^-*fc4 


A.NE.B 


AtB 

.NE. 


li} tLJfe»- 


.GT. 


0*J*f 


A.GT.B 


A > B IS[ iiLJb- 


.GE. 


cW^jf Jpf 


A.GE.B 


A > B lij iLib- 


.LT. 


o*c>"f 


A.LT.B 


A < B lij iiJb- 


.LE. 


cHujfjil 


A-LE.B 


A «£ B lil iiJb>- 



^ r\yi\ £*• . fjJl jj^ j* cSij>£A Jp SjUJJ iJkJ.1 oULjJI gjZ 

ijjii* J-lU-l -j* t (j^Lal- JSvJtoj . A-jS'jllj Sjikll c/}|j»«dLI I Jp I* (. **-y**«J> 

*( EBCDIC^ ASCII Jjl JUL| t A J*JUI >;f ) J^cUl f IkJl u-~~>- <. oUJJ 



iSjU, SJikll oV^JJ .NE.j .EQ.jUxuX jcv-J oli^l ^Ul : it*.*. (*) 
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V-L-f ijaku oljJj* _ 6.2 

4^1 ol^jlli^L 6.31 

. iijlLJU i»5kj> oljhj (l) 
.NOT. (2) 



AND . (3) 

■ . OR . (4) 



a~"\J\ iJtk* &\Jy _ 4 JjJlJL-l 





4+**~5 





i*J 


.NOT. 


o&*\ 


- NO T. LI 


Up LI «jl5 1 j| lLJfc>- 


.AND. 


0) ^is 


LI. AND. L2 


L2j LI V6 b\S 1 il iiJL>- 
«-^ j Jaip . iJLto- 


. OK . 


<C*)jf 


• LI. OR. 12 


L2jfLl jlSISJiLi*. 



ij2kil jjjUsII _ 6.32 

Uj& ol jS^ i^Vl oli i iJikil ^UdJ 4_Jb JU-I ^"lsj . iJjVl jL»l c . 
j^UJI J L-S^ -u-IjaH ^-iJ lij ^ iUVl Jlwc-1 ."u*Vl Jl^cu-L U> 3 j* 



LOGICAL L1 ,L2 

■ ■ m 

L1 « A.EQ.B .AND.L2 .OR. X.EQ.Y 
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• *i*- ^ X.EQ.Yj L2 t A.EQ.B 
ob oil t pjlji-l oUL, ^ t ^ ^ dbjJu ( J^ ]| ^,j f ^ 

. g-UjJJ ^yuJJl J...UH 

itj^l ^ oljjjJl yljf _ 7.1 

ik~Jl GOTO _ f 
GO TO etiquette . U| j£jj| 

■' &* 
GO TO 253 

* : -ul^aJl 

Jj . ^.U^JI J Jaii jj^lj sj | JJV L.yj 0j £ f ^ etiquette ^1 

• ( 5 Jl I & i X^Vl ) iUJl .JU J^Ull jjj_| 

V>-xlUOOTO ^.Vl _ v_j 
GO T0( e I,*2,...,,N),* : f UlJSLUl 

v . 4ik* OjSi of ^jj^l ^ ^J t i^yf ^ -^ ^ clj c2j ^ cN 

1 - 

: ^Ai* 
GO 10(1,253,27,1,12), K 

l-A* J * 5j 1 Ou fa^, i^^, ^J K Jbtb of LljJj ^ goto JUl jup 

.Jill 

& IS ^ , '< ?2 < N > : f UlJ^T 

,/JjU^v . yii^lj.iJ , U-jfy ijU^cN c2,el 

. assign yS a^-ijj Lyi ! jj ;U~^ il^. 

GO TO Y, (12,27,2344,1,8,815) : ** 
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. ( jSi\ II* JJtil USi JJUl ljA\ >it ) 

ASSIGN j*H\- a 
ASSIGN fciq TO u : fUl J^ 

. ^ull GOTO ^.bU fe~»w> 4jj»c -j* SjU ^ v ■ 
. r^ull GO TO yfll hSi 0* r" J «J* ij ^ •/ Ctiq 

ASSIGN 2344 TO Y * 



■Ul 



/•Vi J 1^ ri c^ 1 GO TO JiUI >"* ^ &"* ' -^ ^ ^ "^ 

• t 
<JUUJ - C juilGOTOj V ^IGOTOauJ a J^0fv£ >if : **** 

. ^U^^l^-jit^oli * ^OyjGOTO^ybJl i^LdlcJK 

STOP-f 

ot -^ . j>jsii ji r^ 1 -^ «/* J^ e"^ 1 ^ ^ ,d * 

PAUSE -V 

oui ;>~~» ou o* S A* ,/ numcro ^ 4 PAUSE nun,ero ' il ^ * , 

j JU^ll JI PAUSE yH\ E*H * i*^ 11 ^?A lJ ^^ ^ ^ 
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END_ r 

* 0' ^ ^ *" 

t^-^jll g*lijJl ViVJ £*^' ^J 1 J :, *'j J ? f «r"J ^ 'M A *^£ t-ij-tfllj : /w 

Stj^ill dljjJlil y\j\ _ 7.2 
^^fakdl IF jA\ _ 7.2.1 
: y* f U)l J£jJl 
IF (expression logique) instruction 

I* t .La^U iLU i*JL«j ^ SjLp ^ instruction S*JUJI . v'j^l <_s* i-l*Vl 

. ^p** iJU; OjSi of ^ Vj . ijikll IF i^JLdl jf DO iJUJI lap 

. *ijfr *kl*» j' t5jt=?" -£■•" u* *J^ P expression logique 

UE(A.NE.B) 60 TO 253 

: SJU-lj 
j^-jJI *k-lj|j ^Vl J ajjS'ill tiJjcJI JLiJ iv^. t IaJ&- l J&A\ j^>cS\ oLS" lil _ 

. liilj JLlU (y^wt jJSv-ij AjtSjUl WlljjJlj 

• J!>JI (J* ""M^ ^l 12 ^ £*^lj i»JW J*^-* t J^ Jikll jjodl jlS lil_ 

^jJLIIFj-^I- 7.2.2 
: fUJl J£Jl 
IF (expression arithmetiquc) el , e2, e3 

i>j& Of -j£c (expression arithmetique) ^^JL-I j^lj . L*tyl <y *i*^l 

: sjpUJI 

• eJ - («-^l Jl ^j*i -iili** t <JL. i»J -jp ojU ja t 5_ r JL| _^wdl jis - lij _ 

. e2 j»--jJI Jl ^yJ ji ^ i t j^v» JjUj t5j^.| ji^JI ol-> I il - 

• e3 r^ 1 Jl £>* ^ ' LrfUl ^jJLl ^wdl 15 lil . 

I_F(A + B/C) 12,44,253 : ^ 
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»UI J£i)l _ 8.1 

ijljJl alX . olyi SJUJ oUJLkJI -jy. iLJL» jljSoJ pwl^Jl "j* 4iU-l A Je>£~J 

. DO y.^1 J~oJ 

DO 6tiqo=pl,/,2,p3 : jjb J.UJI JS^J! 

. Sequence 
. <T instructions 
etiq CONTINUE 

. <jvu> *-*j -jp SjLp _ etiq 
. oUJLdl -yi iLJL* Sequence construction : 

^yA oJ_jL£ 'Uw.ixj (»ui a^ji <. Jb»-I_j t »iljjj| /yi /»— oj ,\p SjLp ,e* etiq 
^f _,t t STOP j\ t Jsj^l ^jiJI i-JL^ -jp Ajibfc iJL« j»U jf CONTINUE, 

. ^y-t DO ioJuJ 

. 4aU-\ JJi ^Jj t 4>« s =«w> ilj>«l« "jP OjLp .V 

. 4JiLM oJa>- /JP bjLp «Aj : 1 AaJUI Ll*-^ 

p2 Jl p I ,y v j«^aUj 1 oJj Jp oljl oUJuJl aJLJL. JLiJ ,*^« : JJ«-iJl 

. ( *L>^^a ji- p3 CJlS' li[ 1 JjLu Spas*; jl ) p3 JjIju Ij^as^tj 

DO 15 K = 1 ,50 : 1 Ji» 

15 CONTINUE 

■v 

. 1,2, .... 5()JiU; K Jj 1 S^. 50 jjJt- AilJ-l 
DO 12 J = 2,19,3 : 2ji* 

12 CONTINUE 

2, 5, 8, 1 1, 14, 17 : J J aJUJI ^1 ^Jr jj^ AiU-l 

jlpljiJI . 8.2 
Ija Jttl Jp iiLU jjJU" . CX)NTINUE j-Vl tSjiw J p. fcU-l ilr A&4 - * 

. SJb-ij 
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. l^. olS^ ^t J ( IFjf GOTO ik-lj, ) aU-l -^ jTj>l o*Ull <y- 3 

. au-i j^ijl. jjjJi w Jd-A~" cr> - 4 
£3 jji ijudi Jj au-i Ji JywJi dUi ^~j au .y C j>i o^ 1 o* - 6 

C ^ Jl iP>" <>* : *c c^- N cH 1 «j *>« ^ ) &>>' ^ s ^* 

DIMENS ION TAB(15,30) 

DO 100 K f 1 ,15 

DO 100 J = 1 ,30 

TAB(K.J) = 0- 
100- CONTINUE 

CONTINUE JLjC-4 fJp U &IS^ . Oj^lJ^ u?*^ ^ l ^ i * jC -l ^ 

TAB (K, J) = iJUdl |.Ut Oi^J- ^j 1 ^ ^i 1 ^ <■ 1<)() r"-^ 1 C?*-" 

^Uil JS^Jl_9.1 
. iJUI^I^l-Jl^^V^IJ^l 

Ordre (u, /, optl, opt2) liste 

. tbfll WRITE jf t i*l>JJ READ 0^, jf ^ U >yr£\ 

•a&\ ^%> a^j i ouikji t5ji» •■ s^ 1 w ""^^ J^ ^y u - 

JuL^l t*~^> iitt Jil~ u . jJl i V-e tbill '* fc -r i ^ 3 1 **" ^ 4 ^■^ yi 

JwcJil 4kJl; jJui u i*J 
. FORMAT iJbdl ^j tf- SjU ^a f _ 
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^Jj^l^^nle^ERR^nlJ^J^^^optl. 

J J^Ldl ^j ^ijU^ta^^, END = n2 JSLUI J*j 4 ^,1^1 t op t2. 

. JI>-jNI J^-. il^ wljj iJU- 
. READ jM ff VI J-cj V, 4 iJaVl ^ ^ c_J Jptl, opt2 ) 

• ^.jL^-1 jal* OjSij t oVj^diL ihj^ j^ SjU ^ liste _ 

: iU 
READ (5.15fl) X,Y,Z,K 
WRITE(6,212) ALPHA, BRAVO 

i*l>tfl _ 9.2.1 

READ (». /•) liste 

: &U1I ib£Jl JL-s-L £^ UaVl i_Jpfj 
READ /, liste 

ikS3l - 9.2.2 
WRITE (m, /) liste 

PRINT /, liste 

. oUUy I i^as ^JU, j^JLi ^ t oVU-l ^ J 
PUNCH /, liste. 

V-J»WJ JiljdJ Jj-jJli i^U ilU _ 9;3 
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ordre(«) liste 



: flsJ 



URI.TE (I) Y,Y,TAB 
READ(2) ALPHA, M1,M2 



REWIND u_f 

blob Lp, lil i ^.UjJl ^ J oljl & *> U>y tfUl *iJ« Jl~=-1 u^ 1 0*J 

ENDFILEU-v 

BACKSPACE u_£ 

iL^Jl J> JaLu J> ai u JLikll sj^-jU ^ di/ Jl && yVl l-i* 

ixJtAJl-9.5 
JijM . 9.5-1 

. ,L»ly i^ljj iJ^»i» t £]>•*' 
JjUbU- 9.5.2 
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.READ(5,150) (TAB(K), K = 1.15) 

READ(5,150) TAB(1) f TAB<2), 

TAB(15) 

ttU J^c-u (i) JSLUI . J,l£JL i\^ ^ jjii liU ^ (2)j (1) ji^Vl 

: v-j^i of Uuf Ul£.L c i^y-i <JbU ua j _ 

READ(5.150) TAB 

. Lil «* U^a- TAB JjJbLl OlS" lil 

DIMENSION TAB(15). 

: a*lj5ll 
• cj-'J 1 ! J* ^-j^-I Ml JUxl-U * V*^JI oKW JL*=-1 ilU J 

.-^ 
DIMENSION M(10,10) 



READ (5.211) <<M(K,J),J = 1,10), 

K = 1,10) 



. ( 1.33, b lyi ) OljJjy UL 5/IJJI J JjIjUM Jj^J Jply jJid 

: gun iusaii 4 ij&* 

HRITE (6.313) M 

: J aU*- ^ 

WRITE C6.315)' ((H(K.J) f K = 1,10), 

J = 1,10) 

Format J«JI 9.6 
^Ull JSliJIuiyw'. 9.6.1 

(dtiq FORMAT (Liste de sp&afication) : Jbll y> f Wl J&Jlj 
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«. ( J-SJJI ) J-Jl oLL^Iy L^SY je SjU- j_* Liste de specification 

. Jv»lj» ik«-l^i Hj-^aa 
: J^ ^ ( J&iJl ) J-JI oli^.1^. 

miseen page »i«adl - 1 



ifL?\jA 


gJ>J> 


1 


SJUJI *L>»— =JI JIjj^I 


nH 


n J+nj o»U-o <u.«l.< *LiJj 


nX 


,yiLj <*-. n JU-jJ jt i*-. n je ( ily ) jjit 


9 1 


^Jj^y} uii ij 5 ^ nH J 1 * 




i OjSu of -jS^C wwLtfJI cAk^>\y> : jl j^Jl 




• U^"** Cv. b& id v£ • 'J^l bj*! 




:^- 


5(/) 




12(2H+*)etc.. 






oUmII U-Uc* _ i^> 


otL^lj* 


Q^ji 


In 


"U— » n J «lai i VL&t*0 i/ a * J> j&~ 


Fn.m 


n Jjlai t( (J 3 s to-'iJUi') ^jfl-J*- JJ Ia»L» Jjp- 




(5j~«£)l *)»JD lfv> m viw>>- i iw 


En.m i±^- ( 


i 4*~* n J^lu i IS^ca <uL«lai ,Xj&~ ,«**** js^~ 




iS^^-SJl »J»JJ m 


Dn.m 


i <u-* n JjJaj iy-jay* **Jj t t y*s* > * iJ*** J-s*" 




l^j-XJI *j>JJ IfU m i±~?- 


An 


n J ^k; ol*~JI ■j* aLJLi ^ (Juw J-s>- 


Ln 


n Jjki i ^yiku ^j^** _J*>- 


On 

i 


n JjJa»J t jUill f UaJL ,Jaj" jj»- 



/ t jlj&U J>Ur 3jj— • jjSi of jSCr oUwdl U-U* oU^lj* : Jij& 
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oiljJ| c~-J _ aIa^II ejLiJ jjJb i>^p^^ iiU 



5 F 6.2 

10 115 etc... 



>^LaJI oli^lj* _ 9.6.2 
/ii^ljll-f 

*L>c«S 'jP jjjUalu ~Sj>t£ i/tj 

. iL>*~3 -jP ^U JSJSj i J t 4»Uaj •jp Jail i JUo^l JULP 

. *L>*~»j -jp »lp J5wj jf t Ja~» -jP jiiJ c r-'j'-'ill J^P 

I -ul OjSi ^j ) »jLi>! djJb ix-^w iolJ ,y> n-ii~- t nX JiCiJL J^jo^Jj 

• ( *!>»«=* 

. «UaJl -j* .s^Ip n jt t i*-* n iS3.l J^s t Jl>oNl Xp . 
. n JjJaj oU—Jl -j^ iLJL. r-lj^l jl JU^oIj c ttIj>-VI JiP t *«»-«j . . . nH 

ilj_»*i» t_ij jjd Ju>-l3- iiLLA l)_jS\j d)t i)ji oU-vJl ,v aJLJLi *-jj ^» I j^- y*£ 

cAJa*J.I U-U* oli^l^. - 9.6.3 
( *Jc**>%*> ilJlP? ) I oli^ljll - ? 
. (Integer = I) In : y» JSCiJI 
. iUi>J.I kXJ-\ S^Li^l J,Ju; £• * *A*«iJJ oU-Jl xXt- ,y» n 
cJl5 ISJ t oLmJ-I SjLiNl . <^-Jl ^ ^' j^y v£ * JUo l" xp 
^jJI Sj-iL. j«j of v£ ' ( iJUl ilJipSJ v^l tj* (-) u^ 51 * l) 1 ^' ) '^rrj* 
i oU^ljil gJL :L.Ip SJLpU .JL*j 4 c/tfU-l £*• Jj . aJuJl j *-l^ -^1^ 
jl - jf + SjLi^ 1 l u^W 15 1^^ 1 oU * JI Cr 8 ^ • -^ **- n Jl J l ^ p,b '' ^ "^ 
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(Float = (F) Fn. m : j* J5LlJ! 
iULillj SL&JLI SjLiNl alJUl /u. * iL^^il oU~U J-ISJI :oJl y* n 

. -^Ijall J tk^ j^t Jl ,£>>- f Utfllj sj^II ijiJI *^.WI c - jf + SjCiNl 

( JuLJb- jI-Ap! ) E W»ljll - £ 
. ( u -fJS-E)En.m:jCiJl 

*jJL| jjLil ) OyjL^V 1 J,JUj " f ' i*-**^ 1 ^^ J*^ 1 ^ «/* n 
^ysJl *>JJ LyJl iULSJl 1 ( (Exposant) ^Vl SjLib «■ (mantissc) tf^iJl 

lj 

: (normalisid) j-!* 11 J 5 ^ 1 J ^^ *i^ 

' "Sit* 
- 0.123456E-03 

■ J i.Oj 0.1 Ob y» u;>Ji ^ * U- ^ atf 'M ^1 v^' ^ ^V 1 

: SjipU 
. Aa^aII jlJ^l> Ja^ ii-p- SJLiJ-l 

jJLcj l^j 4 E ilv»ljLI v J«o-J tsJJl JSCUI J U^ly.1 »Aa J*^^^; 
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t-ijJ-L E tJ^M jJjJLj Ljj^j nj> t JLpljJtJl { ~ju *-£ ^j . 4>-o^« isJii jIjlpVIj 

. juyflj £1^1 J «41ij * D 

( olo~Jl J-«}L* ) A aa^pIjLI __» 

. ( Alphanumerique ■>• A ) An J&Jl 

iLjc^-il oL-JJ J*l£Jl jJjJI ,y n 

. o 32 -y. **Kj i£L : "^i. t sytlJJI ■y. i«J£ J -ji>«^ 

. yuA Ic-s J^t jl n J -j£c i UJ? 

44^ LuLc-Iji il»_w«ljj j-J-1 J-*SJ . A«h£ n jj$i ut /j£c 1 r^r^' ■*** 

( 5jiki« oliuu ) L 4o*»lji.l - j 
. ( Logique y> L ) Ln : y>» JSliJI 

ialp »J « TRUE AiJip- 9 c Fj T ^ Hjyi.\ oJUs-jJl oU-Jl t JUoNl X* 

. 1 T JaU 1 «;t5j ^Ul Jp iJ^aJl j|j3ft oU-Vl »J£t Jj . « FALSE 

. Fj T Jaii ^ ip^Jall oL-Jl 1 rl^fl -^ 

( oUa*ll ^ ) Si^ljll - j 

. ( Octal -y. O ) On : jj« j£iJl 

. J^cJlI jJi-l J * oUJJ J*IS3I JjUl ^ n 

Jl iiUl 7 Jl ,y> ^Uj^l ^ l^ £j*J.I SJU>-jJl OL-JI t JUoNl Xp 

. (0) yw^ gjLu ^11 ^Ul 

iJbsJl ilXidLl «. ( « SjlpIl ) J^ 1 ^ J <J^ c> J-"*^ * C 1 ^ 1 ^ 

. oJL* 
oli^ljll jljSi - 9.6.4 

5jU jl/; J-.U* i^^-l oU*»ly\l ,il~-l o 5 ^ 1 u* d ( 9 - 61 •j** 11 ) ^J 
.1* j . 4^ jlyt; J«Uc olL/>l ■>* ip>*^- JLx-1 o^- 1 0" «■ ii d^ aJI <_r^ 

• iJLJl i.KJl : '^i- 
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154 FORMAI<1H0,2(3X,I5,F10.2),I3) 

: JLJI J-JI Jabu 

154 FORMAT (1H0,3X f I5,F10.2,3X,I5, 

F1 0.2 , 13) 

J.JI LJLiSc-1 U\*\ - 9.6.5 

. ^Nl _ JUjMI fcJM J o V^ 1 ^ Jit oLk*- iUU- 

: &. 

WRITE (6,212) A,B,C,D,E,F 

212 F0RMAT (2X,4F12.5) 

WRITE (6.2-12) A,B,C,D,E,F 

213 F0RMAT (2X,4F12.3,2X,2F12.3) 



uiLti^Nli^ 



lujJl obuUJb i^U- *)U _ 9.6.6 
. I Jul *Au Mj _>y&>3 t* - ^ ***~^ ^ Ji^—J 



1 *Jj <U-wJ 


<bk£» 


I 


4>Jl^> /j& JjA» 





J>-jj V» jku>i jl (ju 4>-L**» 


-. 


Aili* ^lu-*)ll Oii *»-l— - • 


+ 


j^yi *UJ1 


U^i> 


LiU- Jauxll iju U i>-L-» - 


iA!bs£ oLi 


(*) Jlwo ^k-Vl iju u w — • 



. pJ^i g-u^j v- 1 * 1 « J 1 ^ 1 » Ji y* <*> 
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t Jlj jJlj ^ai\ : FORTRAN *ii J i^liJl ^.IjJl /y ^f iujl ilL* 

. BLOCK DATA oU-j^Jilj i^&l £*UlI 

i*L ^ypla^ jwu ik-.ljj ^talijJl 4jIJU j « formille V^Ijj i>w» » *JljJl t-iyu 

• JlyjjJ 

: ill,! 

FL1(X) = (1./A) * EXP(-A/X/X) 
TG(Y) = SIN(Y)/C0S(Y) 

* 
of -jSLc : f-\~»j>- oNj>^» -jp ojLp ^ i = SjLiNl jL-o Jp oj>-jJiI Xj Y 

Jp ojj^yi yi* j^ : ^a^- tiy^j* jj-SoJl ^p ^ A ii^>Jil <, (1) Jill j 

. FU(X) AiljJU ^JUU ^f JJ ii^ Oj& of ^ . = JjLiMl. jL-e 

: , *p|j2ll 

. JLidJ iLU i*JL^ (^t JJj i p^jJ' ^'-^ J V^^i^' AiwaJl 0J& of <-•£ - 1 
O J& jt •_/££ ) ik^l ibS JJ 4JIjJI £j0 jjp r-^*aj of <--£ *• ►Uia^l Xp.u 

. i-jw illjJ oJb-lj 4*^ t5j-- ilt* Oj£j Ol -j^? M - £ 

. illJiJl j X^ •>» Oj& of ^S t t5j>-f oNb i olf>«^ jf (Scalar) 

Ovc ,> b^. b£o ol o 5 ^ ^ ^^ li 11 ill - Ajl r*l : £=^ ** jljSyi ""** 

o^lJJl-10.2 
y.^1 JL»j (.U J^JL. lf^ i Ji-^- t5j0ll £»l^ jp SjU ^ Olyjji ilbJl 
. HND y% ^SJj * FUNCTION j*% tx; ^j . ^jl! g*M J end 

. RFTURN ja\ Jp JiVl Jp ^j^ of v^J 

: j* olyj> illJUU |.Ul j£iJl 
FUNCTIONnom(liste) 

END 

98 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



. oVii AcJi v-ui «i-> yi ■** , j aU d^ ■ a,jJI r*l->* nom 

J fcj^-jll i,UJl oVj»il <. aJwjJI oljJdl ^. 4~Sl/ -jP 5jU late 

. ill jJI j—s;- Jj *>J^ll «-i* J cJjII ^ 

FUNCTION FACT(X) 

LE(X.EQ.0.) GO TO 18 

L£(X.LT.0.) GO TO 11 

FACT = 1- 

KHAX = X 

DO 12 K - 2, KMAX 
12 FACT = FACT * FLOAT(K) 

RETURN 
16 FACT - 1 . 

RETURN 
11 WRITE (6,188) 
180 F0RHAT (/2X, 'ERREUR f X NEGATIF') 

RETURN 

END 

jpS ^H ^-pwJI ^—iiJ (Foctoriclle) U.UII Jlloll *»— * £.UjJl |JL» 

. ob£J (3jt Up -lili* o^i of ^jxJJl o^J • iSjfr 

aijJl ^1 ^.Ij. ^jll g-fcjJl Jl aUJ iJlJLlL. ly-^JLli^all : SjUi^J 

. ( FACT : y> p-Nl Jill IJL* j ) 
gjS ^Jl ifill iJUdl Jl 4 ^jJI g-UjJl Jl ,^JI x~! RliTURN ^1 
wlj 5Jb tftSj t If.— 1 iiu.lji *3 ^)b £*kjJl y" . *Jb p«lJ^I oj*a Sj*iLt 

( SUBROUTINE ^jiliJl g^Ll ) ijJUll g-I^JI - 10.3 

.-ik&dL.-'rt .-Jpf Jj ..FUNCTION £y & illJtf ^IsJl ^tijJl ^ 

. LikJi ib>j JjVl jH\ 
: r UJl JSLiJl 

SUBROUTINE nomfliste) 



END 

j^ ilU Oj£j ot ^-it FUNCTION *y ,y JljjJL i^-i ^ Listej nom 

. ^jJbJl ^.UjJl r<Jr ,-j JSVl Jp RETURN ^ ,y 
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fj» Cj»y>\ ik-lj, ^j : ^i j, SUBROUTINE ^liJl gfcj\ ijM 

. CALL 

: ii* 

CALL TRI1 (TAB,N) 

JL^,!*] U-U ^ oljJj> iJU; JS t FUNCTION ^ -^ Jl, jj| J |^ 

. SUBROUTINE ^ ^ ^Ji ^ J 

o\^«iJJ S^bll opiyJl . 10.4 
^j_JLJ ^L^ j\ <Jb ^j ^ ^u _ ^U^ J Sa^-jJLl o/tf^dl 

: oU^J ^ SUBROUTINE 
( t*-^ ) iKi oVj>«i. _ f 

U-^o* u^SL jt ^ t 4*^1 jupj . \*jj, j\ (Scalaire) ijhl^l V t *|jrt|| ^ 
**SV (argument) ^Uu ^ v_l!&- J-S^ i ^jJLill _ g.LijJI-iU, J L^ 

ALPHA Liy^Lb v ^ * IJK» . JljJl ^^ ,^;lsJ| ^U^JI J ^ o^- 

■u-JL t^l ^ . ^j gk y -AsuAy iyz.ju.j i^tJl ^.i^Ji J ^j^. ALPHA 

. 0UJU1II h^ji 

-BLOCK DATA v> J »*X\ _ 10.5 
X> . <-A. r ^Jl Xp oVjpJLI jIj^V <^. 1 ^U ^U gAlj*. dlJi J_Lo 

oV«=- jIj^I ^ BLOCK DATA ^j ^ ^LJ ^.U^J ju^JI jjjtfl 
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BLOCK DATA 

COMMON X,Y,Z,K 

DATA X,Y,Z,K/1 .5,2. ,0. ,27/ 

END 

EQUIVALENCEj COMMON jA\yi\ _ 11 

EQUIVALENCE- 11.1 

: |.UJI jSLiJl 
EQUIVALENCE (liste 1), (liste 2), ..., (liste «) 

jf (Scalar) i-^-jJ^Ul cj^j^AL, 4*cS^I -jp JjLp ,y. Liste i i>J^Ul 

.OoljJ 4iuj|jj Ojjljil O JjPuJbL 

: ^b. 
EQUIVALENCE (X.Y.K) , (TAB ( 1 ) , M (5 ) ) 

. S/IJJI 

aJ Oj& J£ij ( i^>^ai\ ) M j ( iJijrtJ-l ) TAB JjlJbM -jjjU u-~J 
■jp J-vSkJL tJJLit jljuJl IJL* . M(5) !)\j& ( t5jLJ ) a^J. TAB (I) Oly* 

. K,Y,XJil/iLl jlyjJl 

COMMON. 11.2 

£j| ,jJ jpli; UojI -jSUIl -yi . 4jjJU ^I^j jf gjkj, ik^ijj iSjJi* o^j^dll «Jla 

: fLJl JSLiJl 
COMMON liste 

*>. JjIjJ-I ilb- J . ifcsj-j; !AJI oV^dl ,y i^JN ^ SjU ^ liste 

• ^»-lj & j oU^oJl -^ Oi^ £~£ o 5 ^ 1 0" <J^J • DIMENSION 
QMMON A,B,TAB(20) : ^ 
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. \j**£e- 20 {j* i_iJtjj Jb-lj JL«*j ^ju&- i}j-A>-j*> TAB 
JC J izyrjA i«JL«Jl oJla of 4^0 COMMON Ju-LdJ ,-pUJI JU*i-Nl 
l^S Jais «ul j?Ji_i of \b[ >^£ . *ij^\ii\ g-ljJl Jj i^j" g* 1 ^! J ^-l^ 1 
iJa^jJl cjIjJcII «JIjJ J LJ>-b y> ^ «, lfi>>«^ 7"~d **&$ J oNjs*sll 

EQUIVALENCE oL-Ldl JpU Jl .U^l g-^Al Jp v£ i il,JI Jj 

. COMMONj 

oUj 9 y £y* o"iljsO» - 12.1 
U-U. J PL / 1 XM\ *)_#-. ,ja °L~i aJJJI Jl FORTRAN 77 ^-yJI J*- 

: JfcJI j£iJl Jp p. jo^dl 
: fUM J&JI 

CHARACTER * n lisle 



C-lill J>ll ^ n . i-uJI jf i^rj^l oNpaii WSl </ Liste ^ 

. U^\ ^>^> kJ&jkni i*r*ll J sUJlI oU-JI J-^-J 

: «li,l 

CHARACTER * 34 Al, A2, B, X 

CHARACTER * 12 TAB (20) 

CHARACTER * 5 REP, * 8 ALPHA, BRAVO 

^j : oL-Jl J-*-. *U*1 oLUj oU-Lu FORTRAN 77 J.J** 

U^-UJI o^j^l - 12.3 
. ( READ jA\ >Jt ) DECODE ^1 O 

fiLCOO£(X, r) lisic 

C . liste *hT*JI jv»1^ Jl i cM 
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:'*s, 
DECODE (X. 12) K, L 
12 F0RMAT (I2. IX, 13) 

. ( WRITE jaS\ JZ\ ) ENCODE ^.Vl • 
: f UJl JSLiJl 
ENC0DE(X, r)listc 

: *s- 
ENCODE fX, 15) A, J 
15 F0RMAT (2X. F12.3, 18) 

M. DREYFUS, FORTRAN IV, Dunod (rdcdition 1982). 
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^LJl J-^JI 



COBOL J j* ■/ 

4aUI »~j>\y - I 

^LJU : ^Ul : i-w 51 cbU; oU-Jl ,y apj-^ Ayj? '*$ J*^- 1 

. LiicJu^l i AUI J^SJI J^J * J^ilHi* J . Sjs^H 

>y yu^.t < (slash) «jj>^ v^* / 

■jV « a* • 

. «quote» jt <-»jji"*''>^ ' *^ ' 

t 

U>lii-ljS«-l.2 
^*5jJl coljiit - 1.2.1 
j^j r lijt t SjLil •_,, SiljU oUJl ■>. JUL. SkJj, ^ i-ijll olill J^i 
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: -X* 
12 
- 14.544 
+ 250 

: Ofly 
1 8 cbbo jf Jit OJ& of ^ A^oiJI oUJU J*l£Jl iJoJI _ f 

o>i. t JjVl pij\ jpLi j^" jf ^^j t izyry* - j\ + SjLiVl dj& U -up _ r- 

• -ks-j u-^W jf ^ly 
**^jf : p-»-r! ^^^jr^o^of^^-j t i^liUUJl J^c-JUa^_i 

• oyJl Mr ij-i^ iUU Jp Lbf ^^ ^ i>^>^> ^Jj oli t ^f 

ij*SjjjPC-jljJ_ 1.2.2 
J-i^i UiJI j^ ^JiU ^Vl J>JI <. (") ^ijjX^f jy ijj^A iibMl oL-Jl 

: «hJ 
'JULES' 
'253.3.4 + 2' 

* JEAN-PIERRE'ctc... 

: JIpIj* 

• O ^jj^jv '***■ ^ o^* W* *■*■*"■ iS^ J* oU-Jl aJULi iSyJ- - f 

( ij^-jJl ) i jjj-aJI c-jI^I - 1.2.3 
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4 iji j^cl\ coljiJI J j*r 



• - » 1 » 


i«J 


ZERO jt ZEROS jf ZEROES 


ZERO 


SPACE jt SPACES 


u^^ 


HIGH-VALUE jf 


iobj "to-ji; **«• 


HIGH-VALUES 


lij-** 


LOW-VALUE j\ LOW-VALUES 


iobj ^<>^5j a**j 




Lb 


QUOTE jt QUOTES 


(") «-»Jr— ^i' 



„ i^LiL. oL^Jl ,y 51-L- aJ>-5 KriT* '*$ <*^ ^ ALL iJS3l 

oVj>^l-L3 
JjjjS" JUL *L^II Jut* J*ljS - 1.3.1 

J y: ^j . bill J cL-Vl Jbk£J S-UM o*ljiJl ^ i iW *^i o Vai 

. i— 30 j* ^-^J ^Vl J>JI . t5^ *^-H ^Jr*.* S Js~* 

: su-l 

ALPHA 

N0M-D0SSIER 

X3445 

9AB76 . y^^ 

o^j^Ali-S'-/- 1.3.2 
i hicrarchisc i^ ) S-fljJ i (Scalar) JLfc^jJ M dj£ ol ^ oMj^J.1 

. DATA DIVISION ^-ilJ i^-Ldl oL^LiJI J ^ o^lj^l J-~/a* 
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iiAilyljf- 1.3.3 
. J y£ Verbcs jUif Uul ^Si iilll ^Ijf 

(127) 

J^jS" ib53l JIpIjA . 2 
5SUaJl ( js^i ) j„j . 2.1 
(*) JUI y> AilkJI ( JSLi ) J^J 



1 2 3 4 5 6 w 
Nl 


7 


8 9 10 11 


12 13 14 .... 72 


73 74 75 76 77 78 79 80 
N2 











N ) ( ^U ) ■- ojL$l Jp ^^ i iJU-l oi* J : J*id ^Is Jp Jjl. t 7 j^Ull . 

Jl HU>\ i AiJUl oUJ5 ^yiiu Ja ^j^ of v_jt t 1 1 Jl 8 -j/i SJUpVI <, A jJ-l . 

J jJL^ N jjJl £^1 j^J> £f: J* i5jX4 i 72 Jl 12 ,y U*pVI i B j~U . 

JJ -^ J—^. t itjJl oUJ £^ J \£ _H" i 80 Jl 73 SJU**ill 4 N2 j_J-l . 

. i-Sj^all 



. (terminal) v>" ^ V-^ 'l^ 1 - ,yri "M J* 6r^ J>\j*-^ (*) 
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*-5^Jl JLtly _ 2.2 

: iJLJI juj . *-* J <w»UM oLo^JI ^/?«.l 

iLuLl i\+ (5jL>-1 i^cfy ^*^ ■ 

. ( I,- »wij H ) t5jLi>-l 4lv»U , 

. ( Ip «-^o V ) lSjI^-I 4JLpIs _ AkiJ t 

*>&& ilr <i^l J^*» ( 

4*^-j APjf- iplj j^SS <j[ i_^j ^ ^Lj Jj^^ ^^Jl iJajj j^Jj jf ,_ji V _ f 
a^Ul J* l^jjj; cj^oll c _^ i i^JJi .j^. j jjVI Jp ; j^-Ij ^L, 

. i^^l 4JU»U)lj JU>UU ^L-JL OpI^jJI ^wiJ _ »_• 
• J* j" J*" •-k-Lj ij^Lu i*w (jj~~« ,yl^Ji j>* T-j^ill thUI - r 

<Ar J Iop U t JiVl Jp ; j^Ij ^L i^ U.^. j£, of v£ jlill J^U.1 _ j 
( indice J.y ) jrfc -^ : ^.yj a^UJl i^i 0j Sj 3U ilb» : ib^^ 

: &* 
MOVE ZERO TO TABLE (K1 , K2) 

* / c * c - c + ^f ) ijUll jf hj±\ oLJUjJJ v-LJil i^liLl ■-,!■, J\ 
^" ' ""^ ^ <*iJ J* 0>« V=V Jj * Jjyfll &L ^.U^JI ^ 

U1S3I . DIVISION id£JL i*^. S^ Ui ^ J* [ju. division 
• oljSill ^[ ^^ t ( A p-ill ) 8^UJ| J fju- iUJ| J jj^^! 
ij* J Section ^|, ^ ^ ^ t ^ fLj | ^ 6jjJ , ^ ^ jj 

• ur"'^l lr" u^Jl *iv~ 1 Paragraphe 
: <JUl ^ J^S *J J objot kUll i^jl^i 
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OU— Jl 

• (i - » J 0-9 <. A -=- Z ^y. JtfVl ,> i~, 30 ) oUS 

( £1^* Afrjf* *laj£j IJ £Z ) Ji^ 

. ( 8 j^UJI <. A jJ-l J (t—1 ) ^y** 
. ( «SECTION» ijL&l, ^u i Z j~M j *-. 1 ) oUUas 

. ( STOP RUN y\ ) LJrill 

K... 12... 

1 D E_N T I F ICAT ION DIVI SION . 

PROGRAM-ID. XXXXXXXX. 

REMARKS. CECI N'EST PAS UN PROGRAMME 
COMPLET, MAIS SEULEMENT UN SQUELETTE 
DE PROGRAMME. SEULES SONT INDIQUEES 
LES SUBDIVISIONS OB L I GATOI RES . 

E N V I RO NMENT DIVISION . 

CONFIGURATION SECTION. 

SOURCE-COMPUTER. YYYYYYYYYYY. 

OBJECT-COMPUTER. YYYYYYYYYYY. 

INPUT-OUTPUT SECTION. 

FILE-CONTROL. 

SELECT ZZZZZ ASSIGN TO 

DATA DJLVISJON. 
FILE "SECTION. 

FD ZZZZZ 

01 XYZXY. 
0? 



WORKING-STORAGE SECTION 
77 ALPHA ... 

PROCEDURE DIVI SION. 
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IDENTIFICATION DIVISION *~Jtfl _ 4 



IDENTIFICATION DIVISION . 
PROGRAM-ID . XXXXX. 
AUTHOR . YY. . .Y. 
INSTALLATION . Z2...Z. 
DATE-WRITTEN . 
DATE-COMPILED . 
SECURITY - 
REMARKS . 

L«J p_L- jJl c oNU-l ^ Jj . (COMMENTAIRE) iJ»-}Ul 4*J U, 

. t-^jdl I Jj» J jj5J of t_-£ ULj»x~.Ij 
jf ) oLw 8 -y. i PROGRAM-ID ^ ^ JJl t ^U^Jl ^1 ju y_ of ^ V 

• *^VlUp|- -oLw6 |> iJ>Jl Ja . ( ci^ll ^^ t JS^I Jp c ft 

• <J^> ^J J ***• if -J ^rJ IDENTIFICATION p ill 

ENVIRONMENT DIVISION _ 5 

: iJUl ,y. ^1 IJLA i«UJI LSp\ 

ENVIRONMENT DIVISION - 
CONFIGUR A TION SECTION . 
SOURCE-COMPUTFR . 
OBJECT-COMPUTFR 
SPECIAL-NAMFS . 
INPUT-OUTPUT SECTION . 
FILE-CONTROI - 
I-O-CONTROI . 

configuration ^jiJi . 5.1 
. ifa>*ll i>j Li olxljVl obyiJI jf ol>Jl 



SOURCE-COMPUTER. XXXXXX. 
OBJECT-COMPUTER. YYYYYY. 

CONFIGURATION ^1 J,ISS t J^ jf ^ 

* ^yM CONFIGURATION ^U COBOL A.N.S.l J ; Sk*."*, 

Ill 
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• ^ufJjVl 0?>iJl til »U1 

J ^lyU l y*~ ^yu" SjUL £*-J (SPECIAL-NAMES) &UI SywJl 

: felll 

SPECIAL-NAMES . 

syst-nom I_S nam 

CURRENCY SIGN IS lilteral 

D ECIMAL-POINT IS COMMA . 

JUol 5JL>-j OjSj jf -j5Lc ^jll i nom-systcme |»UaJl *— I <-iyu Jjill iU^I 
jUi^L, j_» IS a|jj «, nom ^\ . ( Sysout, SYSPUNCH, : ^ ) ^j^\ - 

■ J^ 1 
. iL»jJI i«-- i_iyu iJliJl iLJ^I 
. Jbj^i\ iklJlj iLv»UH jljif ( _ r SU. £*~I iJliJl iUi-l 

INPUT-OUTPUT j^-JJl _ 5.2 
FILE-CONTROL SyiiJl _ 5.2.1 

FIL E-CONTROL. 

S E L.E CJT nom-fichicr 

A S S I G N TO nom-systemc 

ACTCT S"S~~M0DE IS SEQUENT I A L/ RANDOM 

ACT UAL KEY IS nom-donnce. 

■j^aJI J a-^-I^. ^j t g-j»J.\ ojL^ ^1 -y> ojUy.nom.-fichier 

. |t .n „J,1 Sk-I^ zsk i jr|>^l- J^l S-fc-j p-ly nom-systeme 
i ^y 1 ! J^JI 0« ^.j »l/rij c^" SELECT - ASSIGN TO... iU^-l 

. ^iULl ^JUL, o-iUUJ i-J^ ^1 *i>V\j* L5* ACCESS MODE aL+I 
^ j* < UL^u-Ij . Jurf/H W s?* ACTUAL KEY iU^I t dU-l .^ J 

I-0- CON TROL . I-0-CONTROL S>UI - 5.2.2 

RERUN ON nom-systcmc 
SAM E AREA 
fUll lTTPl.F. FILE TAPE 

(*) A.N.S.I. : American Nalionul Standards Institute. 

1.12 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



aL*A\ LjJI LUo jJLdlj 1 (buffers) ^Nl - Jl^M J n$J^ ^ 

. f lkJJ i~LJl jSiyi Jl ^j-jJIi ^J 1 ^ 1 jw^i^f c^L^ilj 

DIVISION DATA - 6 

DATA DIVISION - 
FILE SECTION . 
WORKING-STORAGE SECTION - 
LINKAGE SECTION .(note : section non au COBOL 

ofliciel) 
REPORT SECTION .(note : section facultative) 



Jp LljlJ ( FILE j WORKING -STORAGE) ONj*sl» jUlksH ^y. 

«_-£■ t-ise-jj ?*ij-^\ V 1^ liJ-" g*^ 1 ,>* f— ■*" >* '-5ATA p — ill 
y> oLL*ll c-i^-jJ fl*)! JSJJ1 . Ukll c/>UJl Lfci Lc t ^.U^Jl j oLkJ.1 

: JtJl 

nn nom-donncc clause 1 clausc.2 ... clause n. 

. B ^1 j \*\j A p—aJl J 14 i oLUll 
^1 dj£. of jsJj . g^jil i^l^ M (^-1 o* 5jU yb nom-donncc 

oLk*-JLJ i_jL,oj /j* jLp yb Clause i JcJl 
. i_i^>jJl U*p ^ t JaVl Jf- JU-lj ^Lrf ic-^J.1 t ik£Ji 

objl-AI iJlP-6.1 

. COBOL Ai) J Sij=rjlil obf-Al't jJLp » (Vj *^"M Jpr 2 Jj-Mr' 
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oLji-il iOp _ 2 JjJLJL-l 



Jj^- 


MARGE 


FONCTION i*$ll 


Cju iX^AI 


oisai 




FD 


A 


(Ja2i FILE ) ^yikll J>~J| c^j 


SD 


A 


( JaSJ FILE ) j^iJl J>^ i_*v»j 


RD 


A 


( Lii FILE ) REPORT J* II <-iv>j 


01 


A 


jL-Sjj 


02-49 


Ajf B 


*L«i oLkjo jl *~£j {v» *jjjU - *^"J 


77 


A 


( WORKING-STORAGE Lis ) i!j >, oLk« 


KK 


A 


LyJl^l 


W> 


A 


( RENAMES JUJI ) £^>dl ^J 



oLyu-Ll . FILE SECTION p — «SI J Vi;^!* "¥ RDj SD * FD oLyiJLI 
^Vl olyiJLl WORKING-STORAGE SECTION ^Jtfl J ^ ^Ji; ^ 77 

. j»LiVl ^ J j$fc Of -j£? 
: JUI y. Up itiUll Vj iLll .^JjJl 

FILE SE CTION . 

FD "7."- 

01 ... 

FD . . . 

01 ... 

So ... 

66 .. . 

WO RKING-STORAGE SECTION . 

77 ... 

77 .. . 

01 ... 

01 ... 

88 .. . 

66 . . . 

o^3««JI i li,/>j _ 6.2 

F_D nom-dc-lichier ■ JJl ISliJl 

BLOCK CONTAINS ■ f d*~" 

RECORD CONTAINS 
REC ORDING MODE 
LABEL RECORD 
DATA RECORD 
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BLOCK CONTAINS JUJl _ 6.2.1 



BLOCK CONTAINS entierlf T entier21 



( characters ) 
| records j 



RECORD CONTAINS JuJl - 6.2.2 

. JLiku *L>~d t oU-Jl j-Uj |(Sli ** ^v»ll i (i->«J-l t-L^J J**=—j 

RECORD CONTAINS entierl [ T_0 entier2] CHARACTERS 

. *L>«— Jl *^>- «-iJjJ i*.-**^ ^iJlpf ^ SjUp _ entier I, cntier 2 

RECORDING MODE JtJt _ 6.2.3 

: jS^tJl 
RECORDING MODE IS option 

: J*jcl-LI *lkJl ivol^ Jjj**^ i*K ,y option 

LABEL RECORD xJ\ - 6.2.4 

(_**>j J \j,: Ja^ji ^ XJI 1 JLa . Cj%^J\ i^-jV J*iJll •»>>-'pl J* - d-bj 

jf olilkJl oUi* t oUlkJl ^jU ) ^1^1 _ JL+&) vri^Jl o^-Jl 

. ( obuUJ • 

LABEL RECORDS ARE ( ™\™ D ) 

DATA RECORD xJl _ 6.2.5 

>L* t 1 (jj.-I.~C jjJIa jjkj t oUaail i-i^jJ ^yalalltl J»«-«Jl <-is»J J^ji 

: JSCJJI 

n » t a J RECORD IS I , r „ 

^^ \ RECORDS "ARE ) noml [nom2] ... 
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■ cH»— " «-**»> ijJ>L» xfj Dl (£y~j: nom 1, ... 

o^ljscll i i„s>j _ 6.3 
: f UJl J£jJI 

nn nom-donnee ou FILLER 

REDEFINES 
BLANK WHEN ZERO 
JUSTIFIED RIGHT 
OCCURS 
PICTURE 
SYNCHRONIZED 
USAGE IS 
VALUE IS 

. 66 j\ 88 jf i 77 jt i 49 Jl 01 ^ ^Jj| Jb^fc of cM m ^ 

REDEFINES xJl- 6.3.1 

jljljji iiJ J EQUIVALENCE ^ ) i/l JJl j, jj^ oLj« SiUL £*_- 

" . (PL/ 1 J DEFINED jf 

noml REDEFINES nom2 

BLANK WHEN ZERO JUlJI _ 6.3.2 

J»l& tljiva ,Jaxll i«J 0^3 UXPj . JLJjJl. oQudl Jo jJiJ XJI IJlft 

JUSTIFIED RIGHT jUI - 6.33 

. uy^l i«Jr j*rij jJl ■>• oLw J!jU -y. |^i JUSTIFIED RIGHT 

OCCURS JLJI _ 6.3.4 

: JSCiJl 

OCCURS <>l Tp t-2 TIMES DEPENDING 
ON nom I 

. SjLil JjJb 4><-w>«v» jlwV^-l -jP ojLp ^ c2j c 1 
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jjv; t Jj-kM *>*»- J^jj «*~o tlit— bo* OjS^j of «_-£ ^JJl <, nom I 

. e2j e I (JjiijiiJl l jc* c iJ| 

: oOpUII 
t dJUJU iiUil . J^y? iiTj iJ^iJl jUuVI -jP lJL~ ^.LaJUI L£r ^ 
oLkjJil Ijlp L. t OCCURS xJl J_p ^j^ jf jS^' V 01 ^yJiL oLUlli 

. 88j 77, (>6 oL^lJlL 

SYNCHRONIZED JlJl _ 6.3.5 

. aUjoJII ob£Ll t_ >- iflJbfc «SU J) «iiJa; jlp .iUi ^ijij . Sj^l JJI 

USAGE JtJl _ 6.3.6 

: J-CiJl 
DISPLAY 
, COMPUTATIONAL 
USAGE IS { C0MPUTATI0NAL-1 



•/ C0HPUTATI0NAL-2 \ 
I C0MPUTATI0NAL-5 ] 



. COMP iJKJL ^^ of ■_£? COMPUTATIONAL i«J£Jl : iJi>-^L. 
5JL»-|j &L fcSOi JJl*. _ 3 J jJb- 



OPTION CLASSE 



REPRESENTATION 



DISPLAY 



COMP 
COMP-1 
COMP-2) 
COMP-3 



(■jb J>jj UjJb is^wi Sijwvtf ) CjU— 

( USAGE jlJI ^jU <JU- J 



l5.iJU»of 

(/•O ( ^.L 8 jf 4, 2 J* ) ^^ ,^'liJ 

^j ( obL 4 Jp) Sjjico iiuw iiJLjj iSy^. 4JU«»li 
t/^J ( °kj^ 8 J* •>-*• *rj>y *w**j_j iS'j?^! iiv>U; 

(1 
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VALUE xJ\ - 6.3.7 

: J-CiJI 



VALUE Ij> Htteral 



^ . WORKING-STORAGE p-Jll J ^l J-*^-i ^ VALUE J-Jl 

i«j ojso- jj» auu j J** o^j i F1LE r^ 1 JU *^ '-^ ^ ^ ^ 

^H\ gj\ J aJl li* ^j. J^iVl <y . ( a^ - .L-t ) 88 6y~s o^l-pai 

PICTURE JtJl . 6.3.8 



PICTURE IS chainc 

. ^yJl oLw _ il/t & iUL- ^ Chaine i~> 



Xli,f 



PICTURE IS XXXXX. 
PICTURE IS 999V99. 
PICTURE IS A (15) . 

. XXXXX JjUs X(5) i IJ&* . i.^11 i*- 1 * 
ojl^I c o>X-~^l JUj« : PICTURE ^ cJJj. *y* 4U* ^ 

. «J&I v^ 1 PICTURE •JU^' <>* ^ «/ J : */ 5j ^ 
PICTURE alphabetic V?*^ Sjj-«H - ' 

(«/<• : [~A J 

PICTURE AAAAAA. 
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PICTURE Alphanumeric SoJUsjuVl Ijj*A\ _ *^> 



codes : |A, X 



- f F * * * 



!*i- 



PICTURE XXXXAA, 



codes; |9,V,S | 



4~*3jJl SjjvJl - r 



jL^-jj I -uf :U_£ V <^Jj i ij^^Jl U^LiJl (aligncmcnt) j-S^J .J^. Jp Jju 



^ 



PICTURE S999V99, 



B 0. , Z * $ + 



PICTURE numeric-edited *>«2ll w^Jl Sj^l - i 



: aJUI oL-Jl 
• ( t)> ) u^i d^i Jl tf> >' B 

<jf v£* ■ *i^l "*^> Wl j£/ ilaUl «i* j ^^ij ( . ) ik* JU.^1 Jl ^3; 

. *lv»li JU-^I Jl ^51 ' 
^u~i t tffc 0,4 j* ^1 la* J ^yi ^1 d\s \->[j . 9 -jp Nju J**L- Z 

■ C^^ <1*»"»I_JJ JHtJbJl JUp *ilJbl 

. PICTURE aLOJI i^ J Ub t tl Jb J Ul l^y, bjZ of ^ JuJl .1* + 

. xy*ti ( - J + ) SjU^I apU, Jl ^»jjj 
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. LuMjoJIOIS 

. S i-Jl ^Ij>-1 
. - j + « aW)1I i oU-Jl aljSf --* 
jli^l : 5Jt=- - jt + oL- Up Sk-ljj PICTURE iL-LJl foJ Of j£* 
tffc jJU Iop L. t oUly ?k-ljj Jjll-L £»>» oOa J toj^-jU tffc ojO; (0) 

. oU- - aljrtll »aA v-bll 
U J U^cJii silk* -uAM i** ^ PICTURE COBOL OpI^JI : «*»■* 

•• ^jt-s} cH-l-ij c^» ^ l ^ ^ ^ ^ : PL/ * 

DIVISION PROCEDURE ^-511 - 7 

^ u>^ u joj Jp ^ .*, . <W g-M ^>.^» H 1 ,lA 

otLd! U-Ui oUJUJ - 7.1 
MOVE -7.11 

: 1 JSLiJl 
MOVE nom 1 10 nom 2 [nom 3] ... 

. ( ^Vi & ) vj- *^" j»V=* ^ ^ «^' 4 nQml 

. oNj^ »v-t 0* 'J 1 ** nom 2 " nora 3 ' '" 

:2JSJJI 

C OR RES PONDING nom 4 TO nom 5 

. ol^j Ni iii e - * JW* V** . ^; V* S ' nom 5 > nom 4 f 

. a^VI jJki nom 5j nom 4 oUf; ^^p jl a^JU- 
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EXAMINE 7.1.2 
: lJS^Jl 



EXAMINE nom TALLYING 
[ REPLACING BYlit2] 



UNTIL FIRST 



ALL 
LEADING 



litl 



%f>c* JjLu ) TALLY l-A^LI jjJJ £> nom aL-UU ^ U~* <5j>w" 

(PICTURE 9 (5) 

^ «iUl oUJl *l* J* ^ TALLY O^jll : UNTIL FIRST i^Jl _ t 

. (littcral) Lit 1 i»-JJ i»jUa» Jj^ jLJl 

5*J| LjJ ubUJ ^11 olyl jJp ,> t5j^r TALLY U*jLl : ALL fc-*ill - ^ 

. nom J Lit 1 

•^ iiUl Lit 1 oL-Jl jJLp Jp 6j£ TALLY ij^jll : LEADING tt-JI - £_ 

. Lit 1 -jp «_Abi£ jJlj nom J i*-» J_jV jL-Jl 

Lit 1 iw- J& i Sj^U REPLACING BY i^JI oJtf ty * ^^' ^U-J J - * 

. ( UNTIL FIRST ilU-l ) Lit 2 ik-l^ JJU- 

: 2j£jJl 



EXAMINE nom REPLACING 



ALL 

LEADING 

FIRST 

UNTIL FIRSTJ 



litl BYIU2 



jULjail-uJii JjVUU-l. 



. jlui^p TALLY 

Sj jJA oUJUslI - 7.2 
: JSLUI 
instruction 1 ON SIZE ERROR ins 2. ins 3. 

. *jj~r *aA*j ^a instruction 1 
iJLp Ifi. lij*!-^ .>£> 01 'jSUil ,y . iilifc oUJLju ,jp SjLp ^ ins 3, ins 2 

^yt Ju& »v- i («-*£,££■ J-a=— 11 jJU-l ) p>J-l j tla^-l iJU- J : jA-iJl 
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oL^I Jl r L^\ jfc^ t Vb . (. . . £j| ) ins3 t ins2 t ins2 oUJ^dl 

. *UL| ii^ 4kaj s^iL, ijui 

ROUNDED jjjJB. 7.2.2 

* U~Jl a^J (nom-donnee) JmA\ - ^J S^U ^3 jj| t Ji-Jl 8 JL» 
50-*- ^ i^Lci\ «x» . ^ ^ j^ jp ^ ^-u^Vl V LJ-I Jl jpji 

. j»UaiL ULjcl^Ij ?wijj JipJL. J5wj 

.ADD : £JL|_ 7.2.3 
: 1 JSLiJ! 
ADD nom 1 [nom 2] ... nom-n [ROUNDED] 

• Vj*" oNj»C* j\ o"^p«ia pj^t ^ SjLp ^ nom i j nom 2, ... 

: £j-*^' J^ lij^*^- - (>" *Jj>cLl *—<lj* nom-n 

nom-1. + nom-2 + . . . + nom-n 
: 2 JSCjJI 

ADD nom I [nom 2] ... TO nom-n [ R0UNDED 1 

• * JS^Jl <-*i J *lj J«* «Jjl» ^j-* 

: 3 JSLtll 
ADD nom I [nom 2] ... GIVING nom-n [ ROUNDED l 

• Vj*" ^IjP J' o*ilj>«^i jl izSij>£jt t\ e *\ jf- ojLc- ,j» . . . nom2, nom 1 
. . . ( nom-n + I a* U ) £*»J.I Jc- tfj*^ jJl SJj^dil *^,| ^a nom-n 

nom 1 + nom2 

SUBTRACT : £>ll- 7.2.4 
: I JSLiJl 
s u B.IRACT nom I [nom 2] ... FROM nom-n [ ROUNDED . 

. (literal) liy>- ColjJ jf cjij>£ji 4^1 ^ ijLe. ,_,»... nom2, nom I 
■ Jj*M J* i£J>*z~» ,j}\ iij>d\ *~*[ja nom-n 
nom-n — nom I — nom2 — ... 



122 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„l.' 1 1. 1 l .l .lll .'.l., i|. '. II l.l.Tl 



: 2 JSCdJl 

SUBTRACT nom 1 [nom 2] ... FROM nom-p 
GIVING nom-n [ ROUNDED] 

: iJUl i>^j ikJ^j Z>j>Jua ^ nom-n ~Ay>A\ 
nom-p — noml — nom2 . . . 

MULTIPLY : ^^11- 7.2.5 
: 1 J£a!I 

MULTIPLY nom 1 BY nom 2 [ROUNDEDJ 

. ioUjf iJjpOi *— 1 {j* «jLp>* noml 
_. noml <~>jj> i-^ji Jp iSj^~* j£\ ilj_»J.I j^l -jp SjIp j-f nom2 

. nom2 

: 2jsLiJl 
MULT I PLY nom 1 BY nom2 G I VI NG nom 3[ R0UNDED ] 

. oNp«=- jf OjI^J -jp 5jU ^ nom2j noml 
. nom2_i noml i_jy^ *»-i Jp c5j*>«=- ,^1 aI^J.1 ,jp h^ c** nom3 

DIVIDE : i-Jill - 7.2.6 
: 1 J-CJJI 
DIVIDE nom 1 INTO nom 2 fROUNDEDl 

. oil jf iljs^u (t-w>l ,jp SjLp ,_,*> noml 
Jp nom2 a_«*J i>«i J_p ^j^l- jJIj t SJpJil ,jp S jLp ^ nom2 

. noml 

: 2J£J1 

DIVIDE nom 1 INTO nom 2 GIVING nom 3 [ ROUNDED] 

. CjIjJ jt oMj>^« •jp SjLp ,y» nom2j noml 
. noml Jp nom2 i»~J i»«~o Jp gy*£~* ^\ a1j>JlI -jp SjLp ,y» nom3 

COMPUTE UJl i*Xdl - 7.2.7 
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: J5^JI 
COMPUTE nom I = expression. 

. 4jp«X4 ^ noml 
jj» j^UxJl IAS . ._AL£. ^^^jf i[p«i. t ix,U ^ Sj u ^ Expression 
ol^ijil U^sf o.plji ^j t ik^l UaVI JUxu-1 ^ i jljljji J LS a»* 

.. ( -5" 4 X t - t + J 4^-JL ) 

i-akll ^uUiJl _ 7.3 
ijUll oljJ> - 7.3.1 

si 

: ^^aj . i-^U^ ojLil Aja^l^j U[j t [&j*- 



GREATER THAN 


> 


o-^f 


EQUAL TO 


= 


iRu 


LESS THAN 


< 


J-ji^f 



^J 1 ^! <y «TO»j «THAN» oUKJl 



: !*> 



A GREATER THAN B 



. B JjU. jf yw»f A otf bl i^f t i-S"Ul 
Uut j[ t oVpdJ Jpjt «, (Literal) VjJ-l cJ>iJl Jp jJk ^-M 1 oU*p_I 

124 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



iLxtLal *J>1*' ' ol yjA _ 7.3.2 



NOT 


o^i 


OR 


^i 


AND 


xJpUj 



iJLJl Op|j_aJli t i-Jakj> (j^jUj jf ) 0*i[^i. -y^ ojLfr Bj A cJl£ lijj 



jJaJ 



NOT A 



A OR B 



A AND B 



(ioJb-) A l)I5 I jj liiip I 

Vuo- Bj A OlS lij AAJO- 

(ialp) D j HJo- A i)\S IS) iiJb- 
liiJb- j Bj Jalp A jl^ li| ciiJb- 

I»1p Bj A jtf lij J>U 

iijb- Bj A l)1£ lij iSJb- 
£Li- Bj «Ji»- A d\S I JJ JJ* 
iLi^ Bj JJU- A jl£ I j| Jait 
JaU Bj A jlS lij W* 



: ^j 1^1* jjks aJUI oUjVI 

. ijJLl Oljjjll (I) 

*; jlali oijJ> (2) 

NOT yjdl (3) 
AND ,#1(4) 
.OR ^1(5) 

. UaVI JLx^L i^JjVl UpIS JjJUI Lcuf -jSUll j* 

p-S^llj 4JIJlI oljJ> _ 7.4 
Jt Jjr L. jji eUuil „ 7.4.1 



GO TO simple 
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: J5UJI 

GO TO nom 

• Ic^J tij^i -**J f ■— *^ J' *j*^' i^-^i jy nom 

j£~ll jjp GOTO r Vl - ^ 
: JsaJl 

GO TO nom lfnom 21 ... DEPENDING ON nom 3 

. A~i\ j\ £j\ji3 t\^\ -jp 5jLp ^nom 1, nom 2, ... 
tjj-.t jJIp ^ n 1 nj 1 ^u **yry *>*?>-*> i»J <Jp i£y£ *}j>£* ^ nom 3 

GOTO . r Vl uiU- ia^-jll flliVl jf ol>Ul 

ALTER _^ 

■jijLJl j^-joo. dUSj <. GO TO ol_*-LcJI JJiJtJ J-i^ £— i y^l IJ* 

: JSLiJl 
ALTER noml TO PROCEED 10 nom 2. 

y> GO TO yiVli c p—j ilau-l^j £j~"^ GOTO j^-j y>j nom 1 ^\ Otf l-M - 1 

•J*. 

PARAG1. GO TO . 

ALTER PARAG1 TO PROCEED TO SUITE1. 



jp ^^4 £»M' ^^ Ic^ j^. ^ J 5 ^ c GOTO r^ **& j^i*** 

PARAG1 . GO TO SUITE1 . 
JiJL-O jm-I ALTER SJUaJL-l ^Ldli 4 GO TO ^l 5USS p. UJ^* - 2 

ALXER PARAG1 TO PROCEED TO SUITE2. : *- 
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: Jj \S j'Vl J^ju Jlj-Jl f-J>_y> ijai}\ 
PARAG1 . GO TO SUITE2. 

S* Jr iX\ glkU^I _ 7.4.2 

: J^SJI 

I F expression THEN instruction 1 
[E_LS_E instruction 2] 

. LS ik^» jj-*j tf- SjLp jJ» expression 
JIJLi-^U iLls t Jjjj^ oUJUl je- JjLp ^ Instruction 1 1 Instruction 2 

. NEXT SENTENCE Ak-lj, %^£ 

: SUpIS 

• *>J~*\ ,/> THEN <J£JI _ 1 

iSfr H u^lj • ifjL^lj* 1 ELSE ik-l^ fjLo ^JJI <. i*Jbdl -j* jlill *^*JI _2 

A*;Ldl i*ij (5^^5*0 Instruction 1 ioJUiJl jp jiiJl ^j c Vjj . instructionl 
■ Jlj^l J* w»l»_ r Jl »|b 1 Instruction2 ^Lp Jj . Instruction2 

In- jf Instruction 1 iJLdl oliC J IF JUjc-I ^1 t IF JsM JJ ■jSULl -yi 
j^Lt^I J-jio -jp '^U ^L-V 1 LJIp l^ «^ ^ AijkJ I oJU . struction 2 

otiJU-l _ 7.5 
Sj_j>-Vl »Jl* . PERFORM i-JUdl ik-lji ^- t J^S ^J J 4 oUU-l 

■ 1 Kjjl-I 

PERFORM nom 1 [ THRU nom 2] ^ 

. ^Lit jt olyiiv^.1 -y. SjLp j^a nom 2 j nom 1 
( (. — «JI jf ) SjiiJl olOj Jl jvJ^Jl JW PERFORM i»JUJl : JjJ^Jl 
t ( *UJMl Xt> nom2 SyiJl U+ J _,f ) nom I ( ^1 j\ ) s^iAJt il^ J . nom 1 

. PERFORM £* ^J| iJLdl JJ ji^dl jlJ 
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^ t/ 3 - r id ^'^ l Cf^ ifi^. PERFORM iJuJI JUiJ ^_ L / 
jU; of <-^ ' nom 1 J ^^ij^ -illift jlS \'i\j . J*s J5C1j ( nom 2 jf ) nom 1 
. EXIT SJU^I i,JUJl Jp- V[ 6J&. *il ^ JDI i nom 2 Jl ( ^J ) 

C PERFORM PARAG2 
< instruction suivante > ( iJLJI ioJLoll ) 

PARAG3. 




( aSjLJI iulfi Jp Jjtf Sjiill ilJb ) 



^2> 



©^ 

PAR2. 
PAR3. 
PAR4. 



PERFORM PARAG2. THRU PAR3. 

< instruction suivante > ( iJU| yujjjl ) 



©/© 



2 J5UJI 



PERFORM nom lf THRU nom 2] nom 3 TIMES 



. o^pI <_Ajycdl (j-ij U> nom 2j nom 1 

. a*iL£1 S»«->«^ oil jl ip^> l v!' iJ_p«i» jjp SjLp ^j* nom 3 

UiL. o\Jj ^JLlI ) lu^Jl l^KJi J ^ PERFORM i*Jbdl JlL" : JJuiJl 

. nom 3 Skw-I^j jJLt ol^Ll -,y> j^*J ■j53> t ( I J 

PERFORM nom 1 [ THRU nom 2] UNTIL expression 
« False Jaii » waj ,y> i-«JL«Jl oJL* U.U* . , Ja\i :■ » jjyu j-a expression 
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i j* expression j^i\ d\S IS|j . PERFORM i_»Jjdl X±j iSj^^i 
. JljJl J* £l=~- ^.UjJl J pJLdlj PERFORM iJUJl J*^l~i t « TRUE 

f U3lJSLiJl_ a 

PERFORM nom 1 THRU nom 2 VARYING nom 3 
FROM nom 4 BY nom 5 UNTIL expression AFTER ... 

» * 
. (t) JyUJl J ^ ui^ nom 3j nom 1 

A]p^» ■jp SjLp jjA nom 3 

. oVj=^« jf ^'jJ cs* nom 5j nom 4 

^lal* juu y» expression 

AFTER JUj VARYING ... UNTIL " iJLdl jI/j" jSUI <y 

nom j^ nom 3 t y ,»Ji)l ^i- PERFORM lJ J ci\ JLi; jl jj JU : J-i-idl 

. ( TRUE iiJb- i JU-2JI ^jikll _^*ill i>-t. j^-j nom 5 JjUI Sjitkj 4 

: ili-f 

PERFORM PAR4 VARYING A FROM 1 BY 2 
UNTIL A = 20. 

OjJb J$Sj ) 18j 16, 14, 12, 10 ,y A iJldJ ~2iS PAR 4 5^4*11 JL& ~s~* 

. ( 20 wJl 

PERFORM J>-lJG__* 
*^. PERFORM 01 ^» IJLaj : PERFORM ^IjVl J^-lJLJ -jSUU -^ 

" Ji 

I 1Sj>j ,. gjd PERFORM i<JL»j SkJ^j ^Jt-J ( *— s J jt ) Sjii J lAUoJ 
IJIa J PL/ 1 Oljljji ,y> i_I»wpf j* JjySJl 0t Sjll oJLa J iJI^p^I i_~£ . viJUl jj 

Jajwj g-l j^l - Jl^-^l - 7.6 

acckpt : s*iyUi J _ 7.6.1 

: J5L1JI 
ACCEPT nomf FROM CONSOLE] 

j '«j- r i^Jl ^ . olsliJl /ill lju* \j* t FROM CONvSOLE uli J 

,y pi jUiNli t FROM CONSOLE JL^cu-l (j;^ % . nom ik-ljj oUJl 
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f ' 

. nom ib**\ji SLM "Jl oL-JI 

DISPLAY : ibSJl J _ 7.6.2 
: JSJJI 
DISPLAY nom Unom21... [ UPON CONSOLE ] 

. cUiljJ jl oMjp^ji -j*- SjUp ^ nom l,nom2 , ... 
Jl oU-Jl iLJL. JUjI ^v* t UPON CONSOLE JL*^-1 ^ lijj 

. iuUJl Jl ^ Nb . ( ^% LiLiJl Jl ^t ) (pupitre) tSOib ( ^cJl SJUiJ. 

J cj^U^JI i_iv>j « i>-jj'3» i_-j» Jj Vh^I ttLp^'j Jl=oNl oLJUf- «-j^ 

i J^w JS £3 ^ ( DATA DIVISION^ ENVIRONNEMENT DIVISION) 

OPEN : £ally.L 7.7.1 
: JSLU1 

. , nom I nom 2 ... 



OPEN < 



INPUT 
OUTPUT 



1-0 



«— j j I'D jJIp i_iL>- oi^>-j^ i o")l>^i Af^ tf- °j\^- lj* no m 2 i nom L 

. DATA DIVISION oLkxll 

. SaI^I £* J^Jl ^a j^uj INPUT 

. ibSJl JL* J^JI ,3*5^1 ^j OUPTUT 

. ( Lis RANDOM J\j±* ) ib£Jlj S^l^iiJ £± ^ I-O 

oJU J^cl-I . £*ll ju* J^JU ^iJ SiUl Jbfjj "^ WITH NO REWIND _ 1 

. ,yf Uil .U^/l J J^JI f>! . Jwi 5*ljiJl J J~*~J . REVERSED _ 2 
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; READ 5*lyi)ly>L 7.7.2 
. ( Jt=- ) 1 j£ill 

READ nom 1[ INTO nom 2] AT END instructions. 

. J^-Jl *— '1 y nom 1 
iJLdl Jl^ljj iww^j- UL»jl ~± SL?«~dl -jP ik-J . *iy>^j> j^-ly nom 2 

. . iLjoJ.1 ,y> INTO ii^JI cJlS lil t nom 2 J i MOVE 

. (^iL.^L)2jSLtJl 
READ nom 1[ INTO nom 2] INVALID KEY instruction. 

. (DATA RECORD IS ...) J^JL 

WRITE : ibSJ! j*l _ 7.7.3 
. ( Jb» ) 1 JSLtJl 

WRITE nom U FROM nom 21 AFTER ADVANCING nom 3 

. *L>^-Jl *~<1jJ>> i nom I 
4*wJl oJl£ lij a^ ,^1 JJ a^-j^j, ^» oUjJLdl (Jlu-p- aJj^ia *- 'ly nom 2 

. aU*x~* FROM 

6* J y^'j (*^ Pc ^ ' J j*- ^ J' *J j 9 *^ j\ i ijl^J ijU -jp SjLp y» nom 3 
iSJ-p-1 bj£s xi iw 4_jc>-I^ t-^J c Jj-»- -sy^ 'j* 5jLp J 015 lijj . _"^Vl 

■ : UbJl oL-Jl 



1 


+ 





ik-lj-j JJL^J of -jS^' ( l*\j_i}\ J_i ^k- -y. jit ) AFTER AJu^aJI 

. ( S*lyUl JU, >.- -jP j^L ) BEFORE 

. WBITJnomllEMUiDm^ * ; U....F 
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WRITE nom 1 [ FROM nom 2] INVALID KEY instruction 

CLOSE : J^I^L 7.7.4 
:JSJtJI 

CLOSE nom 1 [clause] nom 2[clause] ... 

. c/jU^ a^I -j^. SjLp ^y, nom 1, nom 2, ... 
: (^j£j of -j£c (clause) JLJl 
J^UVI J_~ J] SjUI ^ -J J^J! jf '^ ^JUI WITH NO REWIND _ 1 

^.UjJl Ak-,1^ J~«^J of I jj\ jZj *il J^J| ol ^u ^jtfl t WITH LOCK _ 2 

(.Itdl Oj& of iSjj^I ,y . Sjl^l J i^U ^y. O^UJI jy oLUp 

. olS^ 1 jJli iJLe JSf jy ^.U^ l^f JajcJlI 
- ^c-k Ir-AJtij c JLw«x-.yi il^ t jylj i^Lpi i*JUo JjjjSJI &J JUiuj 

DATA DIVISION p oJl J jy)l Jsw yy _ 8.1 

J_>«~Jl y» grip 1 ! J=r**"j t Oj* Vj^" J 3 "- 1 J^^* - ^k* 4 jy^l M-*-* J 

■ « J**" » J**- lib * OtAjJUJl ^yuu Jl *i\J>[ i jjyU 

: J£iJI 

S D nom RECORDING HOPE .... 

RECORD CONTAINS 

DATA RE CORD 

SORT jyll+JU:.. 8.2 
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SORT nom-fichier-tri ON { d^c^nViNg } KEY nom 1[nom 2] " 

{ USING nom-fichier-entreel 

INPUT PROCEDURE nom-p-1 J 

{ GIVING nom-fichicr-sortie 1 

OUTPUT PROCEDURE nom r p-2 J 

DATA DIVISION ^\ j SDS ik-l^ ci^jll nom-fichier-tri 

. j^l J*»-> J «>>-jll 4L»t— dl oUuw -jp SjLp ^yb nom 1 , nom 2, ... 

. LtljJ} J^-jj t |>LiVl e),--! ,_jA nom-p-l,nomp-2 

i5j^J • j>Jl J->— *LiJly ^1 lift i-JJL* INPUT PROCEDURE 

. j/--^ JJcii ^ INPUT PROCEDURE J aJLxUiI otJUJl ^^s^ 

iSJ^j . jj~H\ J>— ^Up ^ ^1 IJla. OUTPUT PROCEDURE 

: SAljAJb^fjpLljJl 

RETURN nom-fichier-tri [ INTO nom donnte] 
AT END instructions. 

. rtJLoll »_«*»>- iibfe oUUil {f> m^jj 
flkSl i^li-l olt»^ai icj-l^c ^jUJl ^ t ^i I jj.j , ^jJl IJU 

. AaXUvJ.1 
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3*JU o j j*£- oUK : J9JL0 



»Jr" 



A 

ACCEPT 

ACCESS 

ACTUAL 

ADD 

ADVANCING 

A ITER 

ALL 

ALTER 

AND 

APPLY 

ASCENDING 

ASSIGN 

AT 

AUTHOR 

I) 

BASIS 

BEFORE 

BLANK. 

BLOCK 

BY 

C 

CALL 

CHARACTERS 

CLOSE 

CODE 

COLUMN 

COMP 

COMPUTATIONAL 

COMPUTE 

CONSOLE 

CONTROL 

COPY 

CORE-INDEX 

CORK 

CORRIKPONDING 

CSP 

OMITl'l-D 

ON 

OPEN 

OPTIONAL 

OR 

OTHERWISE 

OUTPUT 

P 

PAGE 

PAGE-COUNTER 

PERFORM 



CURRENCY-SIGN 

CURRENT-DATE 

C 01— C 02 — C12 

D 

DATA 

DATE 

DECIMAL 

DELETE 

DEI ENDING 

DESCENDING 

DETAIL 

DISP 

DISPLAY 

DIVIDE 

DIVISION 

DOWN 

DUMMY 

E 

EJECT 

ELSE 

END 

ENTER 

ENTRY 

EOF 

EXAMINE 

EXIT 

F 

FD 

FILE 

FILLER 

FINAL 

FOR 

FREE 

FROM 

GENERATE 

GIVING 

GO 

REMARKS 

RENAMES 

REPLACING 

REPORT 

REREAD 

RERUN 

RESERVE 

RESET 

RETURN 

REVERSED 

REWRITE 



GOBACK 

GROUP 

HIGH 

ID 

IF 

IN 

INDEX 

INDEXED 

INITIATE 

INPUT 

INSERT 

INSTALLATION 

INTO 

I-O 

I-O-CONTROL 

INVALID 

JUSTIFIED 

KEY 

LABEL 

LEADING 

LEAVE 

LINE 

LINE-COUNTER 

LOW 

MEMORY 

MOVE 

MULTIPLE 

MULTIPLY 

NEXT 

NO 

NOMINAL 

NOT 

NOTE 

NULLFILE 

OBJECT-COMPUTER 

OCCURS 

OF 

SUM 

SUPPRESS 

SYNCHRONIZED 

TALLY 

TERMINATE 

THEN 

THRU 

TIMES 

TO 

TRACE 

TRANSFORM 
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PIC 


ROUNDED 


TYPE 


PICTURE 


RUN 


U 


POSITION 


S 


UNIT 


POSITIONING 


SAME 


UNTIL 


PRINT-SWITCH 


SEARCH 


UP 


PROCEDURE 


SECURITY 


UPDATING 


PROCESSING 


SEEK. 


UPON 


PROGRAM-ID 


SEGMENT-LIMIT 


USAGE 


QUOTE 


SELECT 


USE 


QUOTES 


SET 


USING 


RD 


SIZE 


UTL 


READ 


SORT 


V 


READY 


SOURCE 


VALUE 


RECORD 


SPACE 


VARYING 


RECORDING 


SPACES 


WHEN 


RECORDS 


SPECIAL 


WITH 


REDEFINES 


STANDARD 


WRITE 


REEL 


START 


ZERO 


RELEASE 


STOP 


ZEROES 


REMAINDER 


SUBTRACT 


ZEROS 



aJ 



gHj* 



e?v 



Si>-ljJI olJL;JL>dlj JjijS iiii is<»UMj i Oi^UaU A*jUI V 2 ^ (JH^V 



i^ULl 



- 



J VIGNES. C. COURTY-LAJEUNESSE et C. DEBOST-BENTZ, 
TMorieet pratique de la progrummation COBOL, Editions TECHNIP, 
(Paris. 1972). 
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^LJJI J-^mJI 



pl / 1 iiS 

oLj^ - 1 
oU-Jl **j*Jr - 1.1 
LLp iLjv-11 SJU>-jJI 4Pj*>Jlj . PL/ 1 i*i J oL— olp^ JJp J^rji 
«JULl oLK ^ j«- ^Jt-J ^ iw. 48 -j- apj*>«1I L.f . i*— 60 ja i_ilts 

: oLvJl ,y uibv?t ,; 5J^AJ ■■*>-_# 

. ( *lijVl ) vJ^Jl iiA~~Jl - 
. ivoli-l oU*Jl _ 

29 : x\t> . hJ**Si\ oU-Jl _ I 
: iJUl d.^S)l oUJlj t Z Jl A ,y t aUJVI ,>. **- 26 ^ SjU ^j 

. iUjJl i*** $ _ 

«arrobas» j\ «at» i«-~Jl 3 _ 
. « *»j I ,_/--U ^jll i»-Jl , # _ 

10 UjApj t i^ij\ oU~Jl - «_j 
(*) 9 cil a- ijj-ll flij^l a* ijU ^ 
i 21 UoJlPj Xy?U-l oL*Jl . r- 

. ( Break Uajf ^Jjj ) - ". tJ SiT Jaiu ,y»LJl liili JOu iiliA 
D,ol^l < yjiB,CoLvJl l y. t Jlill JL*^. Jp tJJbj t iJLJliLJLJl 

ABC.DEF . E,F 
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: iJUJI oU-Jl dUi Jbu ilU 

«Slash» «u_*JiJl ■ -yiI / 
(3^1 jf ijrf J"*a> ( 

ika; . 
4JL0I3 c 

&l % 

( J)^* Jy ) o - ^" n 

. ( 4*&»lj i)j g, 

(Identificateurs) oliyJj _ 1.2 
. ( _) ^Vl .y-lj t^JjJl oUJIj iJo^Vl oUJl ,y oli^Jll .^ub 
AaJI . J^ali ik^ljj 4Pj~Uy ASj^w OjSjj . ol^^l^jUy-F^wiy.Jj^liy 

. ( _ ) JisVl JaJ-l \j» L. 1 J^ly ^ i^U-| oUJl 
JU 0j& V L»a^j . pi./ 1 j LJJ Ijji 1 ( ^Iji ) ,_^L 1 Lj| l^j 

( oLiLJl ) oUl^iJl ^y •j-lw jiJU- ,y ti&y UJL. J jf t oU-Jl ja iJLJL. J 
oLiydl J_>-l-L, jLC ^f J ^.jj Of fljiil -jSCc il^l Jj . Jb-lj *\J i»Jb 

£0 TQ SUITE; i..;*.^ i*JU c** 
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GO TOSUITE; 
l fl ;... j* «SUITE»j 'TO' oUKJI J^iJ of «--£ & Jf «Jj^ **i~" cs* 

. ( j*f ) »-bL« ids' _ 
: olijjw ,^p XjUp ^ 4JUJI aAi»V1 



FIN_DE_LECTURE 

WRITE 

DECLARE 

4526_TR j»ij ik-lji fjU" 

ALPHA-X ( _ ) iu»l>- i«— Jo c5j^ 

. PL / 1 iiJ J Zj.^ cAJ£ J^jj ^ 1 ilfJl Jj 

PL/liil JoLk*Ll_1.3 
. I,; J jJU<x> j* Ijaj c oLLwil {y>j^> J-ky PI-/ 1 **J *~*3 



BINARY, DECIMAL, 
FIXED, FLOAT, REAL, 
COMPLEX, PICTURE 

CHARACTER, BIT, 
VARYING, PICTURE 



lAJaJkl f^jj 



J«>^-.. 



: *lUl oLk~ 
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LABEL 


(LABELS) iwjf- 




TASK 


( oiJAL. l£-j~» ) JL*f - 


Ouut* 


EVENT 


( ixLOi if jj ) tl2ilj _ 


^•IJjJL ^ 


POINTER, OFFSET 
AREA 


CiLJ>_ 




ENTRY, RETURNS 


J^-Ijl. <L-f 


J»-|jL. *L~.f 


FILE 


O^A>i-j 


0^>ui 



DECLARE iuJLdl _ 1.4 

* * f * 

>— • "> •>- IA w-j j^aJLi -wij i_jj_s<all fjibj . oU^a> S~L«s- j[ Jb»lj JLc>-[ liLp-1 

: yh J£iJ| 
DECLARE identificateur attribut-1 attribut-2 ...; 



-X* 



DECLARE ALPHA DECIMAL FIXED ; 

DECLARE TEXTE CHARACTER (2000) VARYING 

INITIAL ( ' ' ) ; 



: M{ * J* 



DCL ALPHA DEC FIXED ; 

DCL TEXTE CHAR (2000) VAR INIT C ' ) ; 



Dl 



X'LARIi^Vl ,jJC J oUj^Jl (JJ- of tfJ t liUJJ «U1 



DECLARE: 

DCL ALPHA D_E_C FIXED. TEXTE CJLAB. < 2 ) 
VAR INITC ' ) ; 



SJIpUII 



. (par defaut) JaLJlj i^l PL / 1 i>-b t 0y" J*^- <^K^>- °-»* j' V^ 
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£A\ijAS 4-UJl A^jl\j il^Jl J~J _ 1.5 

ib£]| J*J _ 1.5.1 
. j^" J~J J PL / 1 4iJ J oUJUJl t^ 

u^J • 72 Jl 2 a* s - u *^ 1 tfj- vi^all gJl~' V t LL*, . 80 ^Ul JJ 1 /^UJl 
. ui^lL i^U oU-Lj iU-lj, I^Lju; ^ of -^ «. ijl^j ^ sju*VI .a* 

.-SjJ jJ! iUUJl . jbsJi ^ .a*, . iJL^U _ &* Mk-ljj i*Xdl ^sj 

of ,jSUl <yj . iUUJl _ *ksJ| ^ ^ iUoJl . islkJl h\+ ^J," c i*JUJi 

.* jJa-JI ^pAJ ,J* oLJju SO* ji^oJ 

A = 0; BETA=A*B/TA<54,7) + SQRT(X); PUT 
DATA ; 

uik£ Oh *J-# jM'.c.UIjJJI -^ bo* £^j f -^Jl ^ t iLjdl Jj 

. oli^Jil 
(Commentaires) 5J»-!M _ 1.5.2 

oL^Jl & iL±* ^ i-fc^l . CHARACTER ^J -^ oliJI J la* L. 

• / & '. tjCjtMl "yt MiJ.»l lOJj . 44jU>J.| 

of ^ * _, / oUJl . * / : oL^Ji ^ jojlji .a* u J^ i Uf ^j 

• V\rf lei* £J> t?f OjJU 4 syiL. «bj 
a* Ua* kjl^f Ui^Ul Fjls . ^ J> ^ OjSS of y^*JJ •>/ 

.. * / «LJ- Jjf ^ Ua^ ^j / * UJUI ij£*Al 

: aJLLoT 
/* CECI EST UN COMMENTAIRE */ 

g-D^Jl p oljOij oU^^f „ 1.5.3 
uu 5sj»-jll oULdl ,y a-L, o* SjU ^ ( DO oU^ y ) oU^Jtl 

. lnu . . END iJLdl. DO 

ALPHA: DO; * J . 

A = 0; B,C,X = 1; : *-. 

MI LULE (EDITEUR) LIST (K1 K2>- 
CALL PSC; ^^ M,W '' 

END; 
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ALPHA: DO; A = 0; B,C,X = 1; PLTT FILE 
(EDITEUR) LIST(K1 ,K2) : CALL PSC: END; 

ULjJft J^I>JI jL*J-b l>-f Op tS>Vl JU. aJb-ljJl iJl^» ^ oL-Ull 

. olslkJJ 

gi& L^Jj <. oLJUJl ,y J—^ ^p SjU Uif <y> (Blocs) oljaiJl 

. *L-^I Jp t-iydL) g-UjJU J-Lcj L. J* Jl JjJbjJL, t OpIjSJI ^^ul 

^ l£~Syj . PROCEDURE oljJLillj BEGIN oljJbUl : b\*y ^j 

r " : iJUl 

K : BEGIN ; ... ; - - - ," - - - i - - - •" END 

K; 

PA: PROCEDURE ; ... ; --. ; ■■■ i ■■■ > 

END PA; 

6j£j PROCEDURE <^y & Aj>r\ J aJL>-I^ BEGIN S>XiJl bj& of i_^ 

. CALL &**\j. PROCEDURE Jj^ll Sbl> p. of <^r 

M^rl J iUI-o g-UjJI ciJji ^Jl cJpj-^Uj oljAi3l ^ Jj& of v£ 
. .uJl ik-lj, ^L-jJjf jXi- NUs j^i t (procedure principalc) ,^-Jj 
r^i of <j£c (Externa! procedure) *~rM oUl^l -illi* _>& of j^Uil ,>• -j&j 
. OPTIONS (MAIN) ^U-l ^^11 ^<*Jj . ^jll ^1 *M* Ut& 

P P : PRO CEDURE OPTIONS ( MAIN ) ; 

< instruction > ; 

< instruction > ; 
END PP; 

JuJuJl aa-ljj 'LJbj J-IS3I PL / 1 gAijJl f^- 
pROCEDURE OPTI0N$ (HAIN); 

PROC OPTIONS (MAIlP; 
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ijuaj i-tii END *^ xi] ^M* "A j* v&u 

PROCEDURE OPTIONS ( MAIN ): 

. ( JL&JI J^ ) 

1^ t £*UjJl !JU J-IS" J"5U U-U J/IJJI o^vflit ^ t <j£l- J£Sj 
J-* *bJt ^Jlj ij** SjOiJ ^ !/liJI ^a-^t 01 t$I * viUiS ,^-J j» IX-fc^ 
. PL / 1 SJ J S/IJJI ^.a-Aid cMA> *~J ilL* . SjJiiJl 

(STATIC) ,jSL._ 

(A U T O M A T 1 C) yS^lyjf - 

(CONTROLLED) ^Ji - 

(BASED)jJilJ_ 

Hj*cL\ & £ij*d\ i$j>- lil la* U AUTOMATIC ^ Lu^i ! -,bi«il aaJJI 

. ( STATIC lij <j* J*Wl< ) EXTERNAL 

DECLARE X FIXED DECIMAL C1 . 5) 
STATIC : 

lj» S/ldJl J ^Sljlil ^^ . Olyj> W J tf^ U J& ifc-i fy ^» SjbVl 

. g^lijJl Olj JJ »JU tW>- ^LJlj oJb-lj 

. XiJl Xfi \l>[ kj gj c 0&* J£ ,J f ai«i-J cJU fck g.13^11 uJUji jit 

(AUTOMATIC) JLJUjijL 2 
la_* U ) JaJUJL, Si^-L. ^ a^JI . ja OV i Gj vdL pSJ V f U J£i< 

. ( EXTERNAL ^J ^ oVj»^JU 
. iJUi SjJill jj^aJ Uup pi t SjJLiJl o'^-.ju ^jkj 4 ijS\Si\ ^Prfig- 

. «ProIogue» iyull pS^Jl sju J^U pi dlfc JS"j 
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**U 



PA: PROCEDURE OPTIONS ( MAIN ) : 

(X , Y , Z ) 5/IJJI ^ jy^ -jf S>-y_ ^ t iJ^f 

CALL PSC- *- jd^-^yh^ 

CALL PbL, ;z,Y,XoV~UsAIJdl 

END-e-PSCJLiJ 

J^i-tll jJjil jj^i : epilogue 

Z.Y.XJJ ^iJ\Si\ J 
PSC- PROCEDURE ; 

DCL(X,Y,Z) FIXED : 



END PSC; 
END PA; 



r 



/jk FREE j*Vl . SjJUJI j, *L^ •**•. u^J * J± u^^ 1 • ALLOCATE 

JLwc^l Ibjl bb . S/IJUI ol^ ^-Oft ALLOCATE ytdl oULdl 
jLJl ^1 J--S FREE -yV! J_~o~J ot Up c LiL. iJji^ ol>^ iJa-Wj 

. ALLOCATE 

:*. 
DECLARE Z BASED (P); 

l^ ik-^l^ t 5^1 JJI J oNj^J.1 ^ ljZ\? v_JI^ ij^Vl iJULi J 

■ J^ 

g*r OjS J y>j Jv- Jjli £• c CONTROLLED ilU-l 4^ y* JJuidl 

. ^jsai « Jpt » J Sjj>-j1I viAU Jms ^j «^L* oljJ-l 
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«_^UuJl i>y ^--J * ^-M JJ • (OFFSET) ^\j (POINTER) 
»■** jU»l 0* £j* '"-^ <^ J ■ PL/ l ^ ^ ^ ■** jl ^ Jl ^ ' ^'"^ 

iilJl oUmx - 1.6 
i jj-l oUwil - 1.6.3 

. iS^X» iJUali jf oU iL^li : jLjJlI 

4JL&M oLk*U _ I 
oU aJU^Ui - 1 

: ilL.t 

72.192 

.5 

4536 



. i^S^JI 4JU.UJI JOu ()j £j*><^ flSjt S t>~ !■**> • (5. ") ^ 

DECLARE A DECIMAL FIXED (8.2) . B DEC 
FIXED ( 14 ) ; 

*«iJl J^ait 4JaJJ J* 1 t^jL^-l (JSwjj c *JbJ i»l»jt iUp j[ Jb-lj J^ <Si^3 

. flSjVl On flj» (if iJj^J B ^J^"^ ^Jr^J ' i£j~£3\ /t— Jill y 7*j>«-/dl 
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: ik.f 
1011 OB (22jibu) 

101.01B (5.25jjUi) 
• 101B (.625jiUi) 

. (15, 0) ^ LJLiJL aSjJ|_, . IJUS fej 31 J* jl jipVI .!» tfjJ-j 
: olS iL^Lii SJUiJl o^jxdl -jp oU^adl Jp Ji* 

DECLARE KB BINARY FIXED (18) , F BIN 
F_IXJED(19,6); 

. y^>UJl JUj ii«p- c iJYJb L'US yij 18 .yi KB iJ^dtl iJJfci 
. iy^Jl aLoUII J0u 6 L^, viu*. <, aWjo fej 19 -y. «_ilfe» F aJ^J.1 Uf 

*£j>£J> 4JU0U1 4> jwLftil - 3 

. 10 ^ SjiJl -jp SjLp ja <, ^JLi jf { J^\ 1 C/uiJj y> «— a3ti» jj-f U*» J^Jj 

: ils-t 
12E+23 
317.5E-16 
0.1 E3 
.42E+50 

DECLARE CCR DECIMAL FL0AT (16) . 
XA4- FLOAT DEC (10) , 
YFHA6A8 DEC FLOAT ; 

. ij^e 'LA) J6 ,y iSJb CCR 

. f I5jf 10 -y 43JL. XA4 

. JJUJL (.lijf 6 ja «J0 YFHA6A8 

JS^c* iUoli JuSUill j|Jl»Vl - 4 

1 : il*>.T 



11 .110E+32B 
101E-17B 
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! E v-ijJ-l Jl oLi"^ 1 ^rk 
: 3>l. U^LL U\$\ c-V 1 a* <Mj^ i> ^ 

DECLARE KBN BINARY FL0AT (45) , RA-X6 
FLOAT BINdO); 

. LiLS j,ij 45 -y ^-iib iiJL. KBN 

. UbJ flijt 10 ■y .-Alb 5iJb RA_X6 

. Ubl ^ij 21 -j- ^ JaliJL iijJl . UUI fcj 53 -^ ^ ^j^iiJl aj^JI 

t REAL -L^ULI JL^ ^ -J 4 &AJI oUjvaJl ^ J ^1 k* -^^ 

. JaUJb Ui^-t PL/ 1 iJ OjS" Jyo <~*r"J'j 

: a1s*[ 

72.1921 DEC FIXED c/-» 

12E+23I DEC FLOAT 

11.101BI BIN FIXED - 

101E-17BI BIN FLOAT 

J izj^ryj i-^\J[ djSs Of i_^ ( CPLX s^- ) COMPLEX -L^U-I 

:** 

DECLARE VECT COMPLEX DECIMAL FIXED 
(10,4); 

p-J, DEClfe.ewd FIXED (10, 4) JUfe- ^J ,y uiJb- VECT iJ^cll 

: 5JbJl i>^Jl J«; Of i^UJl W*I Ol^b . OE( ' FIXED (10, 4) ^fj 

VECT = 54.6530 + 643.66781; 
0f £A\ =j»i CPLX LitSj L^ Qf&±\ i5j>- oi VE(T <jtf li[ c f^ill ,y 

VECT = SQRT (expression); 

. <uJUj "WJLi jWO <LcUp <Ulp- J P[eiJI L v**' 
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JaLJL i^all _ 2 
r* i ^.Ui if jj j^ ^ ^1 1il_5». i£j~Ll £>JI j- o^cll 5JU- J 

REAL BINARY : ci^VL fjLi .Jl oli'ycJJ 

FIXED (15.0) ' " 

REAL DECIMAL I,J,K,L,M,N 

FLOAT ( 6 ) ej^ll elf. fjLJ N jJl oU>^U 

; (jjSoL^i a-A*id.l 4jlwJl f-l^iVli i oJb-lj iL,oU- JiVl J* IbJb- IJl^) 

REAL . DECIMAL ct FLOAT . 

: iJLJl oU^I "&L. 
DECLARE I A FIXED . ID DECIMAL . FB FLOAT : 



iJtdl oU»ULl Ja*- 



IA DECIMAL FIXED (5.0) 
ID DECIMAL FL0AT (6) 
FB DECIMAL FL0AT C6) 






CPLX 3W&J- REAL COMPLEX : *i>JI 

DEC BIN jUL BINARY DECIMAL : luUJI 

jUL FIXED FLOAT : jULl 

([jUll J-LJ 1 ] f UjVljJiP) : aSjJI 



: iijJLl c^jljill iUS - J^>- ioU iJa>-%i 

(). 1 ISftlift : JbJl JSLiJl Jp obll .Jla ibJ lij ^ . *>-y>~~ . c~J + 0.1 156E 6 

0. 1 156E + 06 jf + 

(Chaincs)J-^LJl_ 1.6.2 

. axj j\ i**^ 32 767 iLJLJl Jjk JjUu 

. l_sj jiuijji ,jv 1 iikixil U .. J I •jv" <0lJL«j vilta ,j-Lo 
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: atuf 

'ABCD' ( 4 y> iLUlJ^t ) 

•NUMERO 5643' . ( 1 UjLu JjkJl ) 
i * . (1 JjJaJl ) 

•NOM = ■ 'JEAN-PIERRE' ' ' 



NOM = 'JEAN-PIERRE' 
(15)'*« 

5 (CHARjUai>-li) 
DECLARE TEXTE CHARACTER (20) ,■ 

20 Jjk oUl ^ iLX- ^ SjU ^ TEXTE *J^«il 01 ^~ IJLaj 

B o>L i^V/Jj* oUJl J^ Ouj Irs. jj^ll ju^JI o^l 

: *- 

1 1 1 10010 • B 

' ' B 
•1 'B 

. 'lllll'B iLUU ibU, ^ ( 5 ) t b iLJUl 
: yuil fcJJl ,__ oui ujl, ^ £J 
DECLARF IDENT B_IT (50) ; 
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. oUl •>. aLJL. #> SjU ^ IDENT2I^=U 
VARYING 4-^UM - 2 

. ( VAR jUsili ) VARYING 
DECLARE TEXT-A CHAR (20) VARYING ; 

. w 20 J*Uu ^ J>j < Jj~^ J>. ,/ TEXT-A tf^U 

iJj^ai f> ^ CS fc,B ' INITIAL c hL._vKJI <_iU <. ujW* C« £^ 

: jiiiT 

pCL X P_££ FIXED ?NITIAL(0); 

DXL VH B£C FIXED IHIT(24)g 

.24 J &L* ^r^- VH fl^dl 

PCL IMC BIN FIXED INIT 01 001 1 B) ; 

10011B jcjlai- IMC *Jj^dl 
PCL TEXT CHARACTER (50) VARYING 
yMITIAL C •'),■ 

i^Jill Jb^fc ilxil Jj t w 50 JaUd tfj** J>i *LJ- ' TEXT a J^ 

g.UjJb jj^i Cjliw - 1.64' 

DECLARE SUITE LABIi; 

PCL <A,B,C,D,E,F> LABEL; 
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: L^J i^-j^l ■jp rr^, ol~>-Vl <-J*f J ,^£Jj 

BOUCLE: X = X + 1 ; 

. -—j -jc SjLp jjnj ( : ) ^ckij i«-Jlj p-_j-JLI t BOUCLE v-i^idl 

. ( la^y jk;f ) JjiJb- 

SUITE = BOUCLE; 

GO 10 SUITE; 
. GO TO BOUCLE ; Ji, Oo JlJL- t GO TO SUITE JuJLdl 

^ y i ^/ir ^Jl i«-l«J- 1.7 

. SjJUif jf ilu~o 0j5i of "jSCrj . jLJl 

: ili,f 
A = X ; ( Ja^ ^fitrfig- ) 

• A «W> Jl * ^"" OjOj JL, ^JUl t X 0>wil JtiUj ilU 
A , B , C = Y ; ( jlo. ^^^ ) 

. A, B, C oN^ai Jl Y OjWd Jli^l ilU 

JjlJLJLl _ 2.1 

JjULIjp^^I ..2.1.1 

^ 32 _. 0j S^ 4i>U V-kll ^H t iJUu 32 H 0j & of ^ J,JbU| 

DEC LARE TABC20) DECIMAL FIXED<6>; 
DECLARE XT(30,30rTnrED; ~ '°''- 

' ^lj •*«- J i 20 Jl 1 ^^ ^ jjjj, ^ ^ jSi TAB ilj^dl 
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DEC FIXED £y j- j» TAB ^Lp ^ . ,y_J^. JjJ^ ^ SjU ^ XT l^ 
. DEC FIXED (5, 0) fj> j* ,y> XT J ^LjJI ^ ^ t (6, 0) 

3 l~f ,y Jb-lj JS3 30 Jl 1 ,j-j «, TAB J>uJlJ 20 Jl 1 ^ ^ jboMl >j±~ 

. XT 

: i»JL«Jls i I i£* . ii)t£ ^ j jU^I jjJb- o~5 PL/ 1 iil J jSUil y 
DECLARE TAB(20) ...; 

DECLARE TABd :20) ■ - . . ; 

JjJlA-I jUit JbJb£ -j^Uil -yj . ,_/riji j* 1 a* J*f ■ i J Jb, H cf*^ iS^' J^' 

. tab' 
declare tab(-5:14) . . . ,- 

i^J- sJUPUdi J-SNjJI v -»- "oj-^UJI j JjIjJLi ^sj t pl / 1 iJj J 

: JUI jsLiJl Jp -uJ^- p. X (10, 10) JjjJlU t laSO* . Cj^\ 

X(1,1) X(1,2) X(1,3) X(1,4) ... 

X(1 f 10) 
X(2 f 1) X(2,2) ... 

JjUMilJlPl- 2.1.2 

ilAPl jSLJJ ,y . JjIjJL-I A^j ilJipN INITIAL i^ULl jL^-i jl£«Nl 

. Li-^jtLKJjJbLl 

DECLARE CSdOO) D£C FIXED INITIAL 
((100)0); 

j ( 100)0 J_.Ull a^-ljj 4 j^w. J US JjJ-A-l il^l p. iJU-l «J* J 

. INITIAL 

: gull sju-i J 

PECLARE HHdOO) D_££ FIXED INIT 

((25)1, (25)0, (50)-1); 

25 Jlj c I M» Jbtb JjVl 25 Jl ^UU 4 UK HH Jj^-I >\M $£ U* 

- l i*Jill Jb^ti ( ij*-* 50 ) JUI U o wJI J*b iJUJI 

152 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„l.' 1 1. 1 l .l .lll .'.l., i|. '. II l.l.Tl 



DECLARE LIIKCIO) CHAR (5) INIT 

( ( 2 ) ( 5 ) • ■ ) ; 

JjU; (5) 'b' . oUIji 5 -y ^jjj- J J_jJbL| | JLft ^ -jjj^ix* Jjf jI-Apj j»ij«. 

. 'bbbbb' 
JjIjULI U-bu, _ 2.1.3 
: Jjl jJU|. U-Ul J> dtftt ilU 
. (index) Jj^jJI a-^ JjJ^ ^ ^LoJl iU—ljj _ 

. SJU^Vl j\ JaJ^l _ 

: tfc. 

DECLARE (A(10,10), B(10,10) f 

C ( 1 , 1 ) ) . . . ; 

B(1,2) = A(1 f 1) + C<2,3)*3; 

B(*,1) = A(*,2) + C<*,3>: 

A<5,*) = 0; 

C(*,10) = C(*,10)*2; 

i^b of v£ A -^ jliJl j«J| Cy . j ^U\ ^ ji ^j ijuji ^^j, c ^ 



APj*>J.I J. 

A = C; 

B = A + C; 
A = 0; 
A = B*C; 
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oLTjiJl _ 2.2 
( ^Ijdl ) 45 j-UJl pijJl eijyu _ 2.2.1 
. f l5jVl ikJ^ i^ L5* PL / 1 iLS^ t J^S i^ J 1^ 

: iU 

DECLARE 1 ALPHA, 

2 BRAVO, 

3 CHARLIE 

3 DELTA . . . , 

3 ECHO 
2 FOX, 

3 GOLF 

3 HOTEL ...; 

iubu a-JIjJI flijVl Oj& jf t5jjj-^l 0* trt 5 * W Jji^ 1 ^ Jl^J 

C.' s J ■ i - v 

oLS'jJl jyj-^ -. 2.2.2 

( J^LHI oLSjJl ) iiUll 3JU-I . f 



DECLARE 1 A P 


2 
2 


B, 
E, 


3 
3 

3 
3 


c. 

D, 

F, 
G; 


DECLARE 1 H, 


2 
2 


I. 

L, 


3 
3 

3 
3 


J, 
K, 

M, 
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oL-LdU itaLc ^ A = H ioJLcJl 



C = J 

D = K 

F = M 

G = N 



oLJLclJ ibl** ^ A = H#* 2 / A; i*JL<dl t ihjai\ u ~& 



C = J**2/C 
D = K**2/D 
F = M**2/F 
G = N**2/G 



( CORRESPONDING : 6y.jS J ) BYNAME iJU-l _ cj 
JS . p—'Vl jj-ij ^dil ^sbilJ oLS'jJl ^yau^aii CjUJju JL.JL£ -j-Cdl ,yi 

. ills- JS J l^ij <j j£ Of i-^r 1 ,y J*f i£jx~r jIOpVI ols^w -j* iJUL. 

DECLARE 1 A, 2 B, 

3 C, 

3 D, 
2 F LIKE B, 
1 X, 2 B, 

3 Z, 

3 D, 
2 F, 

3 C, 3 Z; 



i*JLcJl 



A = X, BY NAME : 



A.B.D = X.B.D; 
A.F.C = X.F.C; 



lJ^U^AaIjU 4J3uc- Jb 






<y 



(EXPRESSION) ^oUdl _ 3 
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oL-Sjj 



DEC-ARE A(10,10) BIN FIXED (30) f . 

B(10,10) BIN FIXED (30) , 

1 TAUX, 

2 PRIM p_EC F_LXED(6,2), 
2 SECD DEC FI_XED(6,2), 

1 COUT LIKE TAUX, 

(C,D) Bj_N FIXED (15) ; 

^ D, C t oLS>- ^ COUTj TAUX t JjlJ*- ^ SjL* \j> Bj A 

) ABamJ jUUU 

C*D; 

A(3,2) + B(4,8); 

TAUX.PRIM - COUT. PRIM; 

TAUX. SEC/4 + COUT.SEC*A(5,5); 

A + B; Cila^ilnjA -/»Lp «J» iwJ -Ju ^ 

A*C - D; ... .. V: " , ' 

B/10B; (UtSoU^klOB) 

TAUX * COUT; 
TAUX/2; 

(OPERATORS) oljJjll _ 3.1 
: PL/ 1 ^J J cjIjJjII -y. <_»L/»f ;j* Jbo 

. <JL*Nl *^\ji UjL>-l ^SvC jJl i iLJUai^l Jl^lyJ ( rwaji ol^Jjll oi* 
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( V ) -> - + (exponentiation) * * 
( i»— i J <--»jJ> ) * 

r M II 

(«ct» exclusif) ( lj*o\i i j i ) g 
. ( «OU» inclusif *Ls±a i jf i ) I 

ij^oljJj*- 3.1.1 
. - + rjeftj f-JLl ijJt-l S%JI oljJj^j prefixes + j - uy (5/ -l3tL» 

. iJUaiti IjJb iliJ prefixe oljjjll 

: PL/ 1 £J J I SJ ^i Of -jSUll ->. 
A * ( - B) ^*, t^JUl A * - B 

' : Jljdl Jp prefixe oljij- Up ^Jau 6? l j£c JJUJJ %\J>\ 

. <**jfc*A IjLiXi A j^ju — A 

. + A I3>1 i ijuyi A ljli.\ jpu ^u - - A 

. jJl 4 - A lij oI^*!j^JA SjLtl jjJJ ^ A 

lj£» PL/ 1 J»^-c f l* J£i,., t PL/ 1 U J fc^^, ^ ikkUl^Ldl 

£- CONVERSION i^SJU jj, y£ iJU t Vb . ^^ J*c Jiirf Ult t UJUd 

1 1 jjAI i a^ii sk-i* jLdi, i is jji t a^yi t sapi5j| t ^vi ijJ- 
. ia»Jl 0*1^)1 ^^ o^ypdl p- 1 ^jUi r op l«J Jbr-j, jJl ilU-l J 

: *•**! jm \s J^pdl opIjS j>-y 
4 '123-45' Jdl J ^ . ^ ^r oL*Jl iLJL. oJtf ty : TYPE ^Jl _ 
&* J aLXJJ =-£ j, |Sk . DECIMAL FIXED Jl bb t ^Uy* Ji>>Jli 
. il^^A CONVERSION ^^SJli t 'AR56,6TH'&. t ^^ 
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Jl DECIMAL Jj^^i t Jabi^wu-jE-ApUJl jJj>ilUol^lJl : BaseSJU>li_ 

. BINARY 
Jl REAL Jj^j^j t iJLjLJl J *J"5L^>-i ilU* oLS li[ : MODE iijkJl _ 

. jL# ^fj ^J ^ «. COMPLEX 
. FLOAT Jl FIXED Jj>«_i t jLJ.1 J olsj^i ilU jtf lij : Eche'lle jUll _ 

( 4-ikll ) oLJl J- , 5L, oljJ> - 3.1.2 



& I 



£» jjlk; i oUJl -^ a^ iJUL. iJUJI ^j, . t, jl« ij oUUjJI »s 

. &LLJI 

A = '010111 • B; 

B = ■ 1 1 1 1 1 1 ■ B ; 
C = • 1 1 ' B ; 

. SJ\ 3 T K £r* '»' B fcJli : oUl ^ (-,) ( N ) i ^Ip , j$\ 

-i A - '101000'B 

-i B - '000000'B . ^Jl 



^ u^- £? Jl if>>. (&) ijiyjll 









: j-^l* 


•1 'B 


& 


• 1 ' B ■* 


• 1 ' B 


•1 • B 


& 


*0'B - 


"O'B 


'O'B 


& 


'1 'B - 


•O'B 


•0' B 


& 


•O'B ■+ 


'O'B 



I j&Jb 



A & B - "010111 • B 
C & B - ' 1 10000' B 






•1 'B I 


•1 'B ■* '1 'B 


' 1 ' B I 


•O'B-* ' 1 ' B 


'0* B 


' 1 ' B -+ ' 1' ' B 


'O'B 


■O'B -»■ 'O'B 
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: IJLSCa 



A I B - "111111 • B 
C I B - '111111 • B 



A I -, C - '01111TB 

A & B I C t* "110111 ■ B 

£ J ULlol J I>._3.1.3 
: olijUl! -^ {\y\ «%' JU 
Sjj-J ill opl^ail ^^ jj^j t oL^ULL ^Jba: oly'tll cJl* lij : i^Ll _ 

: ^ oljJ>LI 



< = ><=>=-,< 



1< -,> -,= 



: oUJl ^jj, iLJLJl 
•rB-^iajL>.(TRut") 

•0"H-> Jaip (FALSI-) 
(Concatcnii(ion) fUsWl _ 3.1.4 

DU 

JU ^ ** > oLJl ^ tf J Jy* Jl ^ ^ ^- J f Udy 
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A = ■ 1 1 1 1 ' B ; otJl j* «UL. 

B = ' 1 1 ' B ; — 

C = ' XY,Z'; oU-Jl^iJuJL- 

D = 'AA/BB' ; — 

Al I B -* '010111101 'B 

A I I A I IB - "0101110101 1 1 ipi ■ B 

C I I D - ' XY,ZAA/BB' 

Dl I C - ' AA/BBXY,Z' 

Bl ID - '101 AA/BB' (Ji>*) 

^ oU-Jl jt oUI iJUL. d\ > iMjdJ fj£c-J . VARYING i~*\$~\ 

Jbu ^J* il,^! J^ . VARYING ^i -j^ Vti l^ £^a» %>>^ J* 1 ,yy^\ 

Jill J ) ^jvjJI J ^rj* <Sy#* uy^ Jjk a* Aiji ^ i/^J * C 1 ^ 1 ^s^ J* 

. ( 3000 : »^pt 

: Uaj v-ilji J/ilS' ^«lijj ^ j£* 

EXEPL: PROCEDURE OPT I ONS ( MA I N ) : 

P_E_CLARE TEXTE CHARACTER (5000) 

VARYING 
INITIAK ' ' ) ; 
DECLARE TO CHAR (78) . NC DECIMAL 

(2); 
LECTURE: QJT EDIT (NC.TC) (F(2), 

A (78)) ; 
LF NC = 99 THEN GO J_0 FIN; 
TEXTE = TEXTEI ITC; GO E 

LECTURE;' 
FIN: RUI DATA(TEXTE) ; 
END EXEPL; 

* s 
(PROGRAM CONTROL) g^Jl IS\ j» t p-&>^)U 

GO TO GOTO 

IF 

DO 

CALL 

RETURN 

END 

STOP 

EXIT 
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GOTO.l 

: ^L. 
GO 10 INSTR-65; 

1F_II 

: o^Jt JL^-t jf ■jSCc i»JUdl oJLa 

(1) LE expression- 61ementaire TH_E_N_ unite _1 ; 

(2) LE expression-elementaire THEN unit6 _ 1 ; 

ELSE unite _ 2 ; 

j\ JUsXa j\ (Sj-^r ts^Lij j^fu tf- "jLp >-* - expression - clemcntaire 
jf t DO AP^wf jf i ik««j ^Ijf ^ < unite - 2 > j < unitd - > I . iiy^u 

. BEGIN oljJli 
. ELSE jf THEN JOy iejj: &u~j r \j\ h^ iiU 

DO I END I PROCEDURE I BEGIN I DECLARE 

I FORMAT I ENTRY 

:IJS. 
LE A + B = C-D THEN X = Y\- ELSE X = 2; 

JjjwJj i X = Y ^f i «THEN» JLtv »yi Qjs-ja (A + B = C - D) I i| 

. «ELSE» ^ jiiil < Instr.suiv. > i3tJl iJLdl 
Z jf «ELSE» j-ii p^iJj «THEN» tf-yJh JJi-y. (A+B-C-D) li>L) 

. 4JUI JUJLdl JIj^Jj 1 X = 

LE A + B>C + D THEN GO Ifl SUITE; < instr. suiv. > ; 

J*r ' "^b ■ SUITE Jl ^y; ju^ t «^ y, ( A + B > C + D) d\S lij 

. iJtll **^JI Jl j^Jl t5^j THEN 

. i5jlj53l DO r VU JUi jlc. 1 DO J i^JL (1) 
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IF j-*\fl\i : liSU : -u ^j ^ t Ji* -jS^, t IF yiljVl J^lJU jj&il ,>• 

. i*$llj i^.ULl iJikll *Ua>-bU L^j, ( jSJJ Of ,jS^' U^lJtll 

DO_ni 

. tfjI^IDO^t- 

DO; . . . ; . . . ; . . . ; ...; END; 

L^a^Jj . iL.L5 SJb-j^ oU-Ldl -j* JJLJL. U-Ur £»— J DO *pj*jJlI 

. IF i*JL-3 j ELSE jt THEN «-il>- ^-L.f JS^. 

ijljScJ* DO - B 

DO variable = expression! JQ expr2 B Y expr3 ; 
END ; 
ilJL. j ^j jL^-Nl . i-j>.l^l N jyl-J bj-&- jt v£ Expression ^Ldl 

. BY I JaUlb ^J^ll J^-L t BY cUJi ^ Ut* 

J^-jJl JJ ^ubcJl oJla ujt^-p. t Cj\ B i A £j* J j«U J~*i-J Ux* 

t UkJl «AA ^J^oil l^Ui i EX3, EX2, EX1 o V^ ^j gSldl o£ . &U-I Jl 

" " . iiU-l Jucd 

,f £.U,JI jL^-1 tp>. V ULU *> SaU-l jjJK~i c TO JI>1 t5j=r lil 

jljjjJL. iiU-l p& •> c cJ^Jl j-i J BYj TO JL^I ^j^ lil <• kW JJ 

. DO JUJjdl ilJb J <«U-I *iy»d ivaji^ll i*jiJk ^ij <■ »-Mj «A i^r" 
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: stuf 

DO BETA = TO 50 BY 5, 100 Ifl 1000 BY 
— — 10; 

* 

END : 

1000..., 120, pJlJ dlli JUjj <. 50... 10, 5, ,y BETA JuJiJ ttU-l j>t- 

. 120,110 

J*, >Si1 jl/odl _ 3 

.(TBjf) 
. WHILE iJbcJl villAJ J^clJ 
: j* r UJI J£JJI 

DO WHILE fexpr. cond) 



END ; 



jj-p J£ JLcj iiU-l ilJLi J «expr. cond» Ja~«Jl ^j^Jl jj^l **s* V 

'0'B 7r. ; ../a7 LjUpj . LfcJLiJ i5j>^-- iiU-ls i TB ^ ia-iJl oJL* jj llltj . U 

. 5iU-l ilji J END gS jJl iJUJl Jj (^S^JI jt^-jj i ( Jilp ) 

. v-ijJ \£ oUU-l JlSLlf cjik£ ULi (lr SUl <y 

: «i!*t 

i 

DO FRS = 85 10 600, TO '1000 WHILE 

(X <0); (*) 

END : 

DO. CAN = BY 10 WHILE (S*S >= EPS); 

END : 

gjl * 30 c 20 t 10 c ytdl ^ill CAN 3^1 Jb^t c S^Vl ilU-l J 
. EPS ,j* (>) JSl S # S twxj U JliP- *5lJ-! (_mj . iiL~~» JjJL>- Oj.Aj . 



1000 Jl ,j, t UliJI ap^II J* VI ,yj. V Wl HUE (•) 
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. DO cAfy^s^Ji *£>«Jl jUib iiLd.1 Jpl^iJI 

GOTO ila-ljj cijIjScll jf- DO 4Pj*>JlI J jlSC ^ J J_p-jJ| -j£»ll -j* 
. ( DO iiJb>- ) hj\J>3 DO 4Pj*>Jl f-^u: IJLa «, LjlaJj . *pj*j*1I oIa -jp i>-jl>- 

. 4~* DO yH\ jjjb- J ^1 iiLM Jl J_p- jJI b£c V 

CALL -IV 

lijj 4_S\jj>cJ ^f t ui-«» (procedure) *lj^-[ Sj_pjJ i«JL*Jl a Jla J^jcu-I 

. CALL ^u-Ijj lib <Gyo l_^ t JljJl Jp I Jbf *l^l JlL' N : ili^L 

: ^i* 
CALL PR0C.6; 

RETURN -V 

iL-Lllj CALL J iJLJl iJaiJI JJ »5^«Jl jLu, j^** tl^ ^ i*Jbdl oJu 
il^ J KND J OjSLw- >t oUIjp-NI Jb~f J RETURN y^ll u^L> j . ^bU 

. J»iJ| , „.U ^Vl 

JSLiJL. SjU- J-jo-Jj . i-*- JuJ JUJ jf RETURN jl£oL c JljjJl *JU- J 

": 41=11 

RETURN (expression) ; 

END _ VI 

^j iku-ljj Ap_jf* jj^J Of l jSlc END . oUja^J.1 jf oljJjill yb j^j 
of ^' <c^ I'-ND y\i\ !JU> . (PROCEDURE jf REGIN) .jJuUl jf iPj^JLl 
jf REG IN '^j> IjlA v-UlI END ik5jl j^J^dl ^Juj, Uxp . J>-lj J JjlkJ 
*JU- ) JlyJl Jp ^1=0 (.i^dlj . ilUi jf- ijJuJl eJLft ^^ t PROCEDURE 
. ( *lj>-^l ii\^ ) v-LAI CALL ^La ajju jf ( BEGIN 

EXIT, STOP— VII 
%p ^ liXJT U . f IkJl Jl Ji=4 jvS^Jlj . ^ £.M ^ri STOP 
pi t iplp w-l^i j_> _ A^^JI JJUii ^Uau jf Ja-^ J 1 i*yr£\ JUcMl ^ jf l~J« 
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. J~iJl ^ EXITj STOP 
Jp gj ^.Li^JU J*ill ^Vl i*+*i c g-l^Jl J \*fry> STOP -^ J lijj 

. (OPTIONS (MAIN)) ^jSjll pI^VI il^ J fa^ll END jfr> 

jjp » ^j; oUl^/l dJLa . END jf STOP ik^l^. ^.Ujjl ^j &\SC ^ 

• £°M ,y W~"^ t END <M^ ^ ^Ij^JLl iouJJl jj^Jl il^i 

. END PA t *, . ^1 ,I^Vl p-1 J* gjj. «END» .JL* 
• £*M &\*j* M SjlSL v*> l*^ ^1 STOP J**^J v 

QN. CONVERSION STOP : 

c ly-| - JUo) . 5 

l^»dl iUaw J* JJL-j _ 5.1 

(1) DISPLAY (chaJne de caractcrcs) ; 

(2) DISPLAY (chauie) REPLY (variable) ; 

I " 

la * m i l ik^ £* fcj^l - J^l - 5.2 

GET ;*lyUl julp JUj^J 
PUT iL£]| jlj- jrl>-^J 
: gjif 3*1 ^ (STREAM) ilk^Jl c l^| / ju*y ll^ 

DATA oLWl ik-l^ ^>-^. _ 
LIST ihj'bl iU^nLj *4>-y _ 
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t 

EDIT ^fc=JL f££ £* - 

oUuii ak-i^ ^j.Jli ^i^i / ju-^i oLUp.T 

GET DATA (liste de variables) ; 
PUT DATA (liste de variables) ; 

oNj>«dlj *>Si - Liste de variable 
: f Ul JS^JL oLkJll ^JUr : JUaVl ^* 
Idcntificator _ 1 = valeurs, identificateur _ 2 = valeurs, .... 

: JUl j£iJI Jp >>«=-. A^sJlj 
Identificateur = valeur ident _ 2 = valeur . . . 
oV 1 ^ ^ ^ ^ ^^ ^ &JM PUT DATA; *JUdl 
JLiS iti- J « j^dlj -i I^p c ^Jil i ( oLSjdlj t JjlxJL-1 c ^Utl *J» ) 

(identificateur =»valeur) 
JW* ik-lj, ^jll gl/^l / JU^I - v 

GET LIST (liste dc donnees) ; 

PUT L 1ST (Mate dc donnees) ; 
JjlJ^ jt t (Scalairc) v^l V <Jij>c* J» * Jl^ll Xp c WSJ1 ^ 

fy ) Juki ^bw Jp 1 oV^I Jl *M c5j^J * Vj** -# c> 4 eI-TV 1 
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ikuiljj ufZ jl iOU •_*££ . oIpI^S 4k-.l^j jf Avoljji itu-ljj iljvii" t ColjiJl 

lf^a»u ■jp aJ^^ia. i cJjill ^. i>JV JSLi Jp(3j£ oLtoJll : r'j*-"^ -^ 

PUT LIST (A, B, C, D) ; 

.005 6.400 .200 -36.500 
■ ^j 3 ^ 1 -fc* *OUl J V^Lj jjjLiu «^Jj -j^JI ,y 

P-UI LIST (A r A*B/C, <X+Y)**2); 
P-UI LIST ((REC(K) DO K=1 JJ} 50)); 

PUT LIST ( ) 
(REC(K) DO K = 1 T_0 50) 

PUI LISTCRACINE DE', X, 'EGALE', 

SQRT. (X)) ; 

■ o\jjji m j gi^i / ju^ai j^u.^ ^y / jus^ii ^ ^ji i ju 

: J.UJI J&tJl J i^Ldl ^JU 
JUc-l IS1 -jSUll ,y . «LIST» 4IU.I J U-cJU i^WUL 4«~Ji ^ fej^Jl 

^ J Ic* * cM> Ak-lj, <J^*i. 4 ^Li^ljil ,y tJV ^ SjUy, J.J| 

DECIMAL FIXED J oli^ljll _ 
jlJ-^'illj^J oUJ|iOpy>W F(w) 

.Uj oU-Jl jop^a. d t oU~JJ J,L£JI jjuJI ^_* w F (w, </) 

io p a^ij, 
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DECIMAL FLOAT J oli^ljll - 
oUl SLJL- J> y> w B(w) 

PICTURE ^ •>• oU*»lj* _ 
. PICTURE oU-Ji iljSt ,>• aUL. P ' image jit 

. A(25) i A (25) c A (25) t A(25) 4 A(25) JaU 5A (25) 

:usftU 
. . jJI (X + Y/XK) A<25) 

PAGE SJba^- i*Av» J*- J^jJi 
SKIP (expression) 
; w i^->w» **-» Jl expression Jj^ 
(Uu,li>u-w - U^ ^t )>-w P>i; : w>0 
c >JI Jl ^y : SKIP * SK1P(1) : w = 1 
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ii^o *s\A> ji>-jj : w < = 
j-w j»ij jkJl Jp -jSy Jbfjjj .w?^w» jOp Jl expr jjjJI Jy-f ) <-INE (cxpr) 
{y JpfwoUliljl t JiVi Jp^k-witS.^ 'JOl^lil . i>«As<aJl 
Jl dD j jpjj^i t ( 60 pIp J£JL» ) 43*4^ J£J AJjil jk-Vl jAp 
. ( k*i^ -jP jis |»U J5Ltj La ,y ) ENDPAGE i^LlJ dLyi 
j*i-j t i*~. w ibS cJ as cJtf I jjj . w pij ^.UJl Jp jsSjI COLUMN (expr) 
. J*-j i^N J Jais J*«i™j . JLJl jkwJl Jl 

PICTURE oli^ljll _ 5.3 
J ) oL^Jl _ jlyff ^ iLJL. J_p pS ( ijj^ j\ ) PICTURE iiv»ljil 
{f> aL»L. Jp l*jlj>-l tjjlkil »^fcdl oLJLp Jp Jju ^Jl ( ijy* _ oU..Jl 

. CjI.o-.JI 
UJ J*jO~Jj I^JjIu^jF JjMOj ojjv» - lLfi\yt «_i]jj ^ll oU-Jl jljSt pJ>y 

*W &jH - J^l W^ J P J-J J L»b ' JS^ 1 J P'CTURE i^U-l « 

. (EDIT) ^Jlj^ 

DECLARE TAUX P I CTURE ' 99V - 999 ■ ■ '^ 

GEJ EDIT (ALPHA) ( P'XXXXX ') ; 

iib>J.I oU— Jl J*OL» lj»v»j _ I 
: ijUl J-.^LJ| oJlA i&t oL. _ jljS - ! '£% lib* 

. till -y iijjM i*- ^f Jp i$ja~j uJUall «jjll X 
. ^I> jt i a*J i^ Jp ^l ^j^. V juidl ^1 A 
• &**[ ^— t5j- ^ji "51 c £l> jt i^ JU- Jp ^1 ^^ N ju*JLI ^1 9 
. S^-ii^l JoL-Jl.jljSlUJL. j^^k^YjfXi— JSVl Jp 

c? 1 ,+675, jaj ' :JU 



•45A567' 
'45.78.56' 
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jt X oU- - aljSf ,> iSj^ ot i^ijJl PICTURE oli^ljJJ iJbf ^ ^ 

. A 

J ^k-Jlj >^yJI pi i jL-Jl ifi? LjsUll J— ">UI J j£ydl ^i ^ j 

ikJj_J jJijll IJL* il4 . i^^l ilv»UU (j^W^I £3jU Jp I Aj-J^l J—*)LJl 

PICTURE '999V99' 

• ( £> > crsJ-J ) & <> ^ • U =" U CfJ 11 " 9 

. «ijll IJl* J i . » 

. oUIji ik-ljj tLii-1 jjJLj jlw»Vl ^r J-A~-J Y 

(Insertion caractcrs) Jl*o^l oL— - 3 

. iUi ^jjii ji / jt . - i«ji jLsii u-ji juoi ji y^ ^>- ■ [ : ■ 

. £l> JUol Jl J^i Oj^ tpjS B 

. s i^Ji ^ ak-ij; aJi jiili ^jli j < - j\ + ) >M '**U* iil cp>" s 

£)> c l^l ^ c L.141 *JUll ulS lib • J^ 1 ***" - *M W> Jl ip>" " 

. ojLVill oJLA £»j* J 
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fJ r jj 4 J»ii PICTURE iLJUl J-fj J oU~JI - djSVl •** £*y 

- " . £aUl SjLi^l 

. o^UJl J^UIj £» - 5 - 4 - 1 

: ^all 

OPEN FILE (nom-de-fichier) liste) ; 

: J^NI 
CLOSE FILE (nom-de-fichier) ; . J>~Jl f—ly 
^ "iSji t ^L i»«JM jjP SjU ^ 4 ^iJl dU- J -Ui i (Listc) i.J'jUl 

(Attribute de description des fichicrs) o^auJl <^e>j oL^ols 1 - - 5.4.2 

h jbdl oL/»UM _ f 
RECORD; STREAM _ 1 

^ oJiA . oL< J5Lijj oUudl ;y> ^>\yj> J»-tf J:?—^ 1 pjl~ STREAM 
iL^J JS t5j^ t iJikil o^L^*«dl ^ aJLJL^ J^»-«JI pJt>u RECORD 

INPUT , OUTPUT UPDATE _ 2 

. J»~Jl SaIJ jf i ^.lijJl j>J J^JI tfy*. . Jl>ol INPUT 

. h\£ j\ i J^-JI^J ^.Uji . ^1^-1 OUTPUT 

. ilxSj Stlji . ^yji «.U^1 UPDATE 

DIRECT, SEQUENTIAL- 3 

oLtuJ.1 ipj*jtj f- ^JUI *%ij* *-x£ 
Sk-I^ LjJl ^-JL ^i, t iJbdl o}U~dU j^L l!L» SEQUENTIAL 

N i^L <L^dl £jL lu£c M . ^l^. .Lp Jp J^Jly ^>JI Jill 
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. f\Ju &u*\j> iL>^i\ Jl ^JiL. £jL ilb» DIRECT 
j^.J-1 b£i b\ <~£ liAJJJ «L^1 . KEYED w-ULl Jj ^3; wULl oJL* 

. ^J.L« J-^L (Volume) 

UNBUFFEREDj BUFFERED _ 4 

. ( BUFFER 

PRINT _1 
. Jms OUTPUT, STREAM o^JJ 
i«-Jl . dUi JOu jf S^L. l^Uu VV ^ •M PRINT o")U~Jl ^ ^aJ 

. 1 iy>UJl (j «1» iil^ aIuIjj SjJuJ.1 
BACKWARD- 2 

. Jais RECORD SEOUENTIAL INPUT o}U~JJ 

* - 

KEYED -3 
RECORD SEQUENTIAL jt DIRECT o")U~JJ 

EXCLUSIVE- 4 

RECORD DIRECT UPDATE o^_^-JLJ EXCLUSIVE J-..* •>■■ ■ 

. lus KEYED 

^jliJ 1 Oy" J** 4^* J^U- i* 51 <J £> d C& •■^s*—^ 1 <^1 «> J- 11 -? 

ENVIRONMENT. 5 

■wu ^y t ^ l^j . oLk*ll 4*^*1 vrjUUl ol>Iil >J- v*UU J* 

. y-T J[ ^ ^ iilbai ^ ^1 i*N . PL / 1 aJJ -j* 

READ FILE (nom-de-fichicr) INTO (variable); 

. UPDATE jt INPUT t SEOUENTIAL o}U~lJ 
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fju iJbdLl READ^IjVl . iij>J.\ J 4JL*~J S*ly Jl i*JL«; JS &y 

READ FILE (nom-de-fichier) IGNORE (expression) ; 

UPDATE jf INPUT 4 SEQUENTIAL iJldl o*>U~JU 
tf-'j&> n>0 cJU I3|j . n p>w jJLp Jl Jj^J (expression) jvj<JI i_~»a£ 

. «d i >*^J n 
READ FILE (nom-de-fichier) SET (pointeur) ; 

. BUFFERED, UPDATE jf INPUT t SEQUENTIAL c/)UJU 
. («Buffer») JUoVl j_!» J S^L* c/>L>~dl y, iijlsJl oj^ -jSCJJ -^ 
°V S-W S-^I^J -U^J Of jiyiS ^1 . J2a.| (JL» Jp ^Jijll jjji iguji 

- ** 

B-EAP FILE (nom-de-lichier) INTO (variable) KEJT. (expression) ; 

UPDATE j\ t INPUT 4 DIRECT o^UJU 
. oUJl ^ 'aL±, J] J^ t Ijjj^i Otf lij ij (exp.) j^d\ 



* 

WJLLLE F ILE (nom-de-lichier) FR-OM (variable) ; 

OUTPUT t SEQUENTIAL o'jUJJ 

• Jik 0*-^ 1 t5ji~f 0_>& of i_^ iLpd.1 
WRITE ^1 . Jl^ J^J, j, iU_- yrf jj j^ ^ ^ 

MRUE. FILE (nom-de-Hchicr) FROM (variable) K E Y F R M 
(expression) ; , 

OUTPUT, DIRECT jl SEQUENTIAL o^UJU 
j^i\ J> • JLti[ fjL ( -^ill jf iji^Vl ) ^1 0^. Of v^ 

. oU-Jl ^ iUL. Jl t % t m 
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^-ujj i^jboVt ^'r 11 v-*-j 4 ^ > ^ r a M ' ( indexe de f ,,e , ) 
re- jJ~ii c t-ii o* 5 A*y> H > J < ^ ^ ^ } M ^ J ^ 

REGIONAL j aL^J pJLis Jb^ ^ I (REGIONAL (2b GIONAL (3)) 

U .(1) 

REWRITE FILE (nom-de-flchier) FROM (variable) KEY (expression) ; 

UPDATE, DIRECT jf SEQUENTIAL cS^Ji 
dU-l jj . tt,Ul SlU-l J SJUilJ apljiJl a^ ^ KEY J (expr) jwdl 
Of Jj'iyyU il-ss =11 oJ& of ^ * SEQUENTIAL o^UJI lfc» dj£ jM 

of ^ . ,/sdi y- f>±\ dj£i of v^ * liiuJ auii . ^ u* */£■ ^ 

t DIRECT ^iL. yLi o^U^Jl *3l=- J . '*>)£& ^M V** Ir 1 ^ SaI > 11 <^ 

. 4**|jJ[ c~J JJU-UJI o-i* 

LO CATE variable FILE (nom-de-fichier) ££1 (pointeur) ; 

BUFFERED i OUTPUT 4 SEQUENTIAL o}U~U 
li b . i^y il^l 0j£ of v* ■ *i Wlc^ <^ SET (pointeur) iiwJl f 
jloJ.1 ^ijll i>j&- P ^ SET (P) Si-^ll U-ilb «J^il -^L- * SET ciJb| 

-_^ r j>«JJ £1^1 (Buifcr) ijjb > SJj*^l «-£» LOCATE ^1 
NU^Ij! «. LOCATE Jldl^ly* I J* . dUiXu V-dl btf Ofv^ . JI>J« 
bUl SJL^JI ibS j[ ^>" jJl ^ CLOSE FILE (nom-de-fichier) S^Udl 
.J*-«J* 

LOCATE variable F^LE (nom-de-fichicr) KEYFROM (expression) 
§_EJ (pointeur) i" 

BUFFERED, OUTPUT, SEQUENTIAL c^U-JJ 
WRITE FILE ... Ui^dJ o^pI IfcH jUil OpIjSJI ^ KEYFROM to^l 

i^UJJ Wl jUU Jri>aJi ^ * s-J^l ' SET ^-^ • KEYFROM - ; 
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fjksi otiU.JU NJ J*-=-J V LOCATE ... KEYFROM i<JLcJl .JL» . iLUl 

DELETE FILE (nom-de-fichier) KEY (expression) ; 

UPDATE, DIRECT o")UJLI 

•j- ajjL Jjf J 'lllllllllll'B LiU -^P SjL* ^ i.^UJl .JU . o">L c ^dl 

o^U^dl . J**ill J LfcJJ jLill JlPljiJl ^a KEY <^oJl J j^dl . aL^JI 

. REGIONAL (1) j»Ji^ o>Uc-dJ la* L yta. JUly J L^ly jU; Vs^^JLl 

oUllu^l Sjbj . 6 

_>f ) PL/ 1 id. ,_j^. ^,1;^ JLij j^, ^UJI ^jjIjJ-I ^^ iiijbt L. xs. 
t. oUa*^ (Ik _ AilL i^ly t ji^Jp i»-iJl t OVERFLOW Ji. t ( U^ 

^j^^i a_pL> £Ua*i/i J,* ^_ |.u jsLtuj . -Mkaji i jut dUi ji^ . . . ~li 

. ^jLLl J^JI ,1^1 

•(5 s ^ f J~* e** 11 $^. V ^ * Sjjkll oUJUl ^V £^y. li* 

oOa cJo*- -jifj ^ jUV -tL^j *tl^ ocly oUl ^ t oULki^l <,Jla jl^ 

J 5»ift * tfjjJ JUiL f lkJl J_*i JIJLL-I ->JlI ,y t PL/ 1 ijj Jj 

. giksrti sji^ .Lis, c jJ^Ji -jS^ii ^ , gjtl ij^j .' ^u^Jl 

0_N nom-condition unite-on ; 

: «li.f 

ON ENDFiLE(FDICT) £0. JO SUITE 1- 
QN ENDPAGE BEGIN ,- ... . END; ~ ' 

UnH£-on 

J *J1 jLill Lj JI & fU&y ijj^ jJU J .lis v yMl JxiJl *U 
J^JI iL, ^ ^UI^ILB^I i]Uj ( ^'. ( j,yj, r j } nom-condition 
£UmM aU- J t ^1 *, . SUITE-1 oL^Ldl Jj V U JJI ^ t (ENDFILE) 
. BEGIN ijOill JJs^*^ t W^l^>->|^iju l uibf ajte^gjlJl 

: ^ «Unit6-on» «Jl* 
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• p—J JJ-^ BEGIN SjJli L-l - 
. i*jj: ^ DO oIp^^JlIj (IFj ON) i^LI oLjL-dli ,y>l>- JS^j 

Unite-on particulieres 
. |.lkJJ i^S^Jl -L-jyJl Jl SjjJI aoi SYSTEM 

: -as, 

ON ENDPAGE SYSTEM : 

\^ «UDPAGE» oUUa£}Uj i « IApU** j^ll ,y » aJJ **£ i*jLdl <Oa 

. ( fe*^ -jP j«Jl aJU-I oJift J ^t ) SYSTEM Ai-^JI 

' (instruction nulle) oLU >Aj 

J, Jr ilL i*rt - 6.2 

. bSL. JJ& Of jSUil jj* o* l d J* ^ b - 

SIZE SUBSCRIPTRANGE STRINGRANGE CHECK 

SIZE 

SUH.S.CR.IP.TEM.GJ SUBRG 

ST R I.N GRANGE 

. SUBSTR aJUJI Jl— i-l -j-^ v* 1 ^ 
CHECK (lisle) 

J* Ifcl >. f> J5 jj . oN^lb ,f / U-./JL Wil ^ (Liste) W*M 

1.76 
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. ( PUTDATA iJLdl «ti aJwz- ^JJl J£lll» ) oMj^ill o.U jf ( Ja2s vJ^c. ) 

i^uJUi *ui -jSUii ->. j3ij \ fcb audi ij^sJi . f 

CONVERSION jUj^I : CONV 

OVERFLOW OFL 

FIXEDOVERFLOW FOFL 

UNDERFLOW UFL 

ZERODIVID€ ZDIV 

. l-^-j hjfr "U-Lu jl 1 BEGIN JjJi t *I>>-1£ ily£ prefixe y\ ik^l^j JJUj 
. JsyiJl rt-*lj SjJiL» **^« 1 NO j* (prcfixc) j*Vl t-ilto 

NOCONVERSION, NOZDIV. 

AREA s/IJJl JLil^. 

. CONDITION ^UMJ^i 

ENDFILE Jb*J*-Wr 

ENDPAGE ' jfc^Jiu^ 

ERROR jjWJoIp 

FINISH g-UjJLlrl 

NAME (o^U-) ^1 j lb>. 

RECORD RECOFtD o-iUJl Jp ^J / JUjI 

TRANSMIT jUjl 

UNDEFINEDFILE (UNDF) ^^J*- 

JSLii iJjwsi «Unite-on» SJb-j J_S" . ^lk*JNl SjbJ ^^1 61^1, ilL* 
J . ik^, iU^c, 4j t ^j. .JO>il t BEGIN SjOi \j\ villi jJL . J5i^. 
. U^ljlL Sj^ iJUdl cJtfjJ \fjrt »^S J* * S^Vl 3U.I 
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• G: PROCEDURE - 
END G; 
\*J END ik-U, j\ BEGIN SjJli IA+ END ik-l^ *i .yuJJl ol^l 

. PROCEDURE G J^ ^ 
i 
t «unit6-on» SjJLill rj\->- Jl (t-S^Jl. JU^L; <Vl J* ^5*^'^ *lr^' 

. GOTO **-!*; Ak-lj* 

(J 

. FINISH ^Ikul Jl i£>>. * W> ^ ty n~* <• ERROR 

:^ 
QN ERROR PUT DATA : 

ON ERROR GO J_0 ETIEXTR; 

iJUJl Jl (vJ^Jl JL&1 Jl ^.i}^ ^JUl ERROR £lka;^l fj~* c ^h^ s 

. ETIEXTR 

FUNCTION^ SUBROUTINE CjUI^NI - 7 

^jJU ^-L^ jf (FUNCTION) *Jb £j_J ,y oU^J *Lq -jSUll ,y 
,^11 IJu* Jj t i^^^u ,y> oWj^-Vl oJLa . PL/ 1 i*J J SUBROUTINE 

. Ifclt Xp o^UJJ jj-p 4U* 
: ojc-jJ ,y> oUUl <, liDJLl iiL^l 
(function) iJta pjj ,y oWj»-!AJ c. iu-> - 
(SUBROUTINE) ^It gV* ^J ,>. ol*lj>-^J t i^lj - 

SUBROUTINE oW^I - 7.1 

■^1 



-* • » 



^,1 y^lj, ^Ij J£i, "ilW Cr a ilj dl^4*l^l J * SUBROUTINE 

: y^Vl liA fUJl JS^iJl . CALL £y y 

QAUL nom-cntrce [(argument 1 . argument 2, . . .)] ; 

SUBROUTINE *I^Vl ^ly. nom-entr6e 
gjS ^11 <*J>cl\ Jl r Ld\ iyo t SUBROUTINE J^fl ^ l*X* 
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. CALL^Vl i^SU 

: SUBROUTINE - Ajr& ^> ftl r V" d ^^ ^J* ^ 

iU J END i^Ldl Jl S"i ' -^ 'SUBROUTINE Aj^\ J t <J^JI - 

" " . »lj*3l 

t 

. *LrrVl ja ^ gy 4 RETURN IJ^ £> i <~* *\yr^\ » ■** J ' H^ 1 - 

FUNCTION *lj>-^l - 7.2 

. SUBROUTINE 

: ioU PL / 1 #lJd v-^ 1^ «• ^^ i/ 1 ( * MjJi ^ ) •> p - aJI 

: *• 
Z = FACT(N) ; 

L^i *» c RETURN j_*t Sk-ljj *i aJUI Ak-I^j ij-^J.1 4*^1 S^l 

RETURN (cxpression-scalaire) ; 

t SQRT t SIN Ji, ) JjlaJL-l ju; t PL/ 1 iil J JljJ ^j>. 1£> : i^^ 
iJb- ,1^1 ik-lj-j SiUil i-^JJLi t ( ^L^LI Jlji ULpJj £JI <. INDEX 

. (scalaire) ij»l^l V iJb ,y> (Procedure-function) 

: apljaJl 
aJU-I J LS^ «. 4SUJI Jl •dL-jy c^Ltudl -j- gjj J J~c~J ot J^buS -jSUl & - 1 

. SUBROUTINE 

«JLa J . ik^l oljJdl ,y pjJ ^t Jp i)b _ *I>>-Vl ^j^ V Ot l j->UJ.I •>• - 2 
aIu-Ij; dUal jdl SjJLiJl J C* \p-jAa 0j& Ot *_*£ ilb _ t\y^i\ «~»\ 1 ?HJ-I 
•j, (ijj« flb _ ,1^1 ,—1 Otf b[ t o^U-l ^Uf jj . ENTRY i^liM 
J>-b j* y <Jb * ^Ij^Vl 015 bl aM ^ oo* ) *} iJUJl ( il^LJl ) ijJUJl 
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VJ£y> t JaljJL £^a}\ PL/ 1 4iJ i>-L- <. iJL.15 oUv»ly> <_>Lp jj . iJlJLJl 

. UJI Jj>\yi\ ^^.j t iJb_ t |^Vl p-i Jp 

RETURNS ajcvJI dUJJ J^cuJ 

. ill jJl ~*\ (^ji— J 1 iJb _ elj?-! ik~.ljj U> iL.Jll i*jUJ 

o%.uilJL-jl_7.3 

Cj\AtA\ ,jA f-y qgf -y, i^Ull Ajkw-jJl oljJdlj OtAaUll dj-»o ot -jiLc 

JjlJbr- 
oL£ jl _ 

<L«^d _jl _ 

olu?*JD iij j| f>iX» _ 

. aXbCU Ait j O jlj>«I* _ 

S/IJLU yiU *Jaifj Sjb| - 8 

. PL/ 1 iki j o^l JJl ^yt^niJ tSjl" /".J' *yrj til X* 1 *' 

. ( STATIC w>l>- ) ^L. _ 

. ( AUTOMATIC i-^U- ) y£JlySJ( - 

. ( CONTROLLED i^U- ) pS^t _ 

. (BASEDw^)r>- 

iL>Li ^jA AjjVl tiiL^U-l 

ALLOC ATI-: y.ljVl ik— Ij, u tf^L; fS>^ c uyj^l 0^-1 J 

^aSL- iJldil ALLOCATE -^IjVl 1 i* J -£>A\ U *~&A\ *JL^ J . FREEj 

£* f-jL j^SU.1 -j-* *JaJ- i^f J aj! ^^-JjJI cijUll £» t ^ijil iy»i»A^I ^^- J 
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jiyj alj^i. au»| _ 8.1 

- _/*"J* l^*^ *^^*" ^y*** ?la**ljj SjijM <]j»bll JaJy «. IfiP T^j^a^i JUP 

DECLARE X CHARACTER (1 50) BASED (P) ; 

oljio Jp i$j& ' jA5* 0* •j'c* «j* 'j ( ^l*- - *LJLi : La ) *Jj»«i« ^ X " 

. X *ij>^Ji jLiJl 5/IJJI 

DECLARE R POINTER ; 

: iJfcu (>( ^^f SjLilj ( - ) >iU SjLtJ 

. jjife 4*A SyuJ .jLst| 45^ c jj> ^ SjU ^ ^J ^ jjl t j^l |JU 

: JbJl J£JI Jp CiL p j^idi ^jli ikj^ Sj j^i| x *Ij>d.l ^ iuj-lj, 
P -* X (XJpJjuP) 

R -> X. 

: UxJI oU^UM Jp ^ of ^ V s^jll 4^1 _ 1 
EXTERNAL,, VARYIN G., INITIAL . 
C-ljJ -j* SjLp 0j£ Of v^ S^Sjll J-OUI Jjt, s^jll JjlaJLl ^jb- _ 2 

(y* j». : (CHECK) variable ( (Prefix d'activation) d^dl iJS JUc-l - 3 

181 
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. Zjly oV- J-jI 0? ifs N PUT DATA, GET DATA oUJudl _ 4 

": J^ 4&\$>-6j3»jf <&> * PL/ 1 *ii 
p -> Q -> R -> X = ... ; 

PTAB(J) -> X 

c S"5Li>. «. JpJU ^ Sk-V. jjjll v£ i PTAB (J) <k--l* X ui^jJ 

: U£j 

S = PTAB (J) ,- S -> X .. . ; ■ 

. -. . j = -.UkAl iJjJl oLLwJl ^ ol^jLl «> i>j— II u^jJI oLLwJl - 6 

. STREAM £ji ,y ^I>1 / Jl^l &-»* j^J- JU-jI .j^ 1 -£* o* - 8 

: oljJislI Jp jiji Ol oUJU: iu jM ^ 
SET - LOCATE ALLOCATE 

SET -83.1 

jj 4 LOCATE _,t READ oU-LcH ^ i ^Nl / JU^I J J**s-S 

. ALLOCATE iJbcH 

*c$> >- J 5 j-V S ^> '**>** *-*•**> SET tt ^ JI tr*" 1 4 1 " ] ^ ** 

.( Buffer ^jbjt ) ^1^1 / J^^U 

DECLARE MANIP FILE RECORD SEQUENTIAL, 
1 ALPHA BASEP (Q). 

2 X ... , 

2 Y / " 

READ FILE (MAWIP) sii(Q) \ 
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p^eu Sj^-Vl oO*j t J«ill IJ* j-^-j *c$jb jJ-l J* 1^1 Lj*/" (►V' ALPHA 

. hSj\ Jl jjs- J* ci^JI ^ J 4»/m lil j^ai- o^sdll «i* £*■ . Q jJ^ll 

jkJl ik-lj; j^oAsJI . 83.2 

P - Q; 

^»JlI g r ^ hor\jC OLyi* Q-> X j P-> X : ucJtdl ,jfib£Jl fy 

■ S^AjLl 
LOCATE -8.3.3 

READ ... SET. 

LOCATE X FJLLE(FMSORT) SET(P) r - 

*=Vj" i> Jy tfl JM' - «- 4 

ADDR,NULL : DbJliJU 

ADDR. 8.4.1 

jip ji iit* <jj>a yjjbU 01^1 aijji .j* j^ 

DECLARE P POIMTER : 
P = ADDR (FOX),- 

NULL- 8.4.2 

.iA #u, JS ^ UJ j^jll Jl J^ ^j . o^UbJ OjJb y» Audi fcU 
*Jj«J « O& OljU £,-. c«J ^jSll Ua . jJLaJ -Ot Jli ^tjll I J* . Sj^Vl 

. fcdH a^t^ villas' 

S/UM j0 ^..8.5 



I* 
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FREE P->X, R->ALPHA, ... ,- 

oNU-l J \<S i AJjJLi >S'jjA l^L-i t iuL^j cAjZy J»jcu-; jIIJLj 

oJUk J=^b J «~~J cAj^yj t (AREA) j^ oNj^ Lif J>-jj : ilb-^U 

. U L^-> ^ jlj . (OFFSET) oljJ-l 

. ^SljlJl aJLLu. _,f ^^Jl J„,L.-H -u£~-!*£Jl oLUJl £*r .1^1. 

itjJJ i^ldl S^Vl -^ iJUL. J* iSjJ- PL / t ^J of Jl ilfJl J j-ZA 

i a->jS of J* 1 S -pi* Irlj i oiJL^- SjjJjf oljji— • £* Jl*pf *LSJIj ^«t— j i io.ua.1 



. ik-aJLI olij^JJ a~UIj c PL/ 1 ttlJ V-^l J^y 

M. DORNBUSC:H. U limgage PL/1. Dunod (1973). 
C'h. HURTIUiT, U' hmgiigc dv programmutimi PL/.l, Dunod (Nouveau 
liragc 19H2) (Cc chapilrc est en fail un condense dc cc livrc). 



PL 



£?V 
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«-w-Ul Ju^iaJI 



BASIC dJL. jl 



4*1)1 *?J>\y - 1 

c-iU-Ji ijJ_ 1.1 



t ti^all JJ ,y jL-J-l J Oliljill Jb^N . iJUJl ^Ixp i_ilifc J**Al Olyj> 

. oL-Jl ,y aJUL. j ii^ta jj5J L-JLiP % L. 

t # a. «±/)Wl 



J 



ui>l v>Jl ^'j^l J-^' : ^^ 

( hM- )j~ * 

n=AXJ _jL«j> Jt)U ( 

JSIJ + 

i*~J / 
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4JL0U ,. &«; i 

kj 4<0\p ! 



cJjllI _ 1.2 
i^JLl c^ljlJl _ 1.2.1 

(*) aUxlJLI oUSaij oli^Jib ij*3j]l ^Jillj cJjiU v>ll f^l jl*3 



12 

-32 

12634 



12.54 

- 0.1234 

123.1 

0.1345E+28 
0.3346E-17 



: ^2JbLloolj^lJpili.f 



S^i 10, 28 Sji 10 JljJl > 0Lx« E - 17j E + 28 t uu^Vl ,jdU-l J 

. -17 

Ju-!>L. £^J ,y c^ljill , 1.2.2 

, ... ^ 

JUjcl^I Uxp -jSj t aJLJLJI JbJb^J ij-jij* ib*i LLuwl \i\j . ( ") rjpj* J^)U 

4JLJUU ^^oiVl J jjUl . 7*&%*0 jA { jSjii\j i. iLJLJl Js^b J ( ' ).iJjjl»-jjVl 



x ••) - w Jl --9.99. . . 9 X Iff"" ,y ^IjlpV.1 .-aX- 4 REAL J£iJI Jj t HP-85 iSUJJ i-dU ' ** (*) 

. 9.99...9 x lO^ 9 Jl 1.0 x 10- 499 ,yj _ 1.0 
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"DEBUT DE PROGRAMME # 27" 
"LISTE D'APPEL" 
"RE.EJITREZ VOS DONNEES" 



u jAj CUtljj - 1.2.3 

t e i IT *-aJl je- SjLp ^j . hy»j CjIjJ liLjl* 0>i %jj u ^>, J~*^ 

: j» [juJj . &SQR2 j &E &PI, ^Vl aL-I^ l«Jl jLijj . -V 2 "-" 



&PI 

&E 

&SQR2 



3.14159... 
2.71828... 
1.41421... 



o V"^ 1 . 1.3 

4.b£)l J*ljS _ 1.3.1 

(■ t 

. *jjj fjr* < -*/ > " *^ a **! ^J jf * "-V"" aJsu-I^j ilj>»dil J-ic 
* * '" '. 

<Ulw«l^j iLtd-lj t iLJLo f-jJ Jyi O "jjpjj ^t U^l^- L&*0 uujl; w J^^m^uO 

A B1 B3 C0 #8 Z XS DJ B5$ Rlf 

. jUiL j\ ijkUl N 0j& of *J_p«iJJ {fix 

(aUVl)JjlJ+l- 1.3.2 

0(11, /») 
OjSS of -jSCt Sj-^Vl »Iaj . JJNj -yj SjUp n, p «, *Jj»J.I j»— ly v ii*-?- 

c/i!j?«dl -y> ^jvasll - 1.3.3 
il*Vl oli oVJLl U . Lai ^i JS^ t»lj£l^J| o^ai &■ ^jJl 
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-> f ( -Mj jj* a^- ) (io) j*ujl o>s^oi~vi t s^vi iiu-i jj 

. -jiM^ o"^u (io, io) 
. o i^aJL ji^jJl foj 

J«~ of UIp -^Jl ^j DIM i»JLdl fc^ ^_ JjjbJU ^yi ^^ji 

: ioJLdl ik^\jj 1 i^jSJl, Fjl: JsNjJI 
OPTION BASE 1 

. i)j4~i\ olf. ^,_j V dLjb g«* gs? ■jSUj 

: ili,f 

10 DIM A(25) 

20 DJJ1 B(10,15) 

30 DIM C(30), D(12 f 5), E(25,50) 

of JjJ+l ^ ^ . iol^L, 3^^, c-lji 5k-l .,, fcb JjIjO-I a U,f aji 

Ok aULJI Jj_L, v_^£ jf ^ ^ t JjlJbLl -y> ^^dU ^JL 1^ t DIM 

: &. 
DIM A« [30] 

. COM ^Ld| ik^l^ , ^A\ gkj\ Jj ^uj, ^J\ J -^IjJLj l^ C ^J 

: !*i- 
JEI0J1 Al, A2, A3 
COM B (20), C(30) 

o^j^AIJUjou-I^ 1.3.4 

t li£* . PI./ I t J^/ t ol^jy JiJ J o\j, U ^-S^ J* t vUL.jL «J J aU^I 

J 88 
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( oUjiv*. ) JcAji\ juJI oli jf ( ol^l ) Jb^Jl _ JUJ! oii JjlaJM 

. MAT i»JUj ik-l _jj UiLuI 

J* Jjk; * (MATiJLdl t -gJy.'ilLjl^y * *jUll * ^^aidl ) oLLJl 
J-^*— **-Lj. i*^ Jlja Uij^i OjC t 4JULI oi* J . g^ljll ^ ^jj| |JU 

u^u jnyi ^ or ^jtyi Jp c^ . j^ji j ^u-i jljui ^^ jjw 



rU^lVI - 1.4 



.yjVijJajij^r^ tun 

A$ = "ABCDE" 

8$ = "+++" 

Ct = "12FGZ" 

D| = AS & B? & C| 

"ABCDE+++12FGZ" <LUI UU^ DS O^i, 

. J«i o»lj >, J* i^^ jf iJLfc t dLjL JUL ^JUj JJ ^jSS 
c>J sap > ^UJ| ib£ dljUl ^f ^ ^ oU-Vl ^ jj 
(CR) u^ij ;u- ^ a*-* v ^ t oUil y , ^ oUSLiJU j^, jj^, ^j 

* JljJl J-* ol^dl aJJ . Jul ila, j * fJj J* *^Lj J* ^ . 
:. Vbt oUji U ajSi 01 OU.UI f UjV tf£ t il^l ^ . 14^,'jUB ^^ 
. (Label) V f-j UJ>- ^j JSJ . 10 ju, 10 f U JiCi, l^ 
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10 LET A=1 

20 A=A+1 

30 B=30 

40 C=A+B 

50 PRINT C 

60 GO TO 20 

99 END 

iL»JLiu Jp ^jiUj-JI ,y j^-Vl jk-Jl i$j$ ■ •^W* *J^I i*JUdl Jl « jiJ J[ 
,_«, =j5Uil -j- c oNU-l *_J^f Jj • e- 1 ^ 1 k^J kkjs* tjr 1 ^ ' END 
i»-Loll J \juja JiU; jJI i STOP iJUi itu-ijj t 6LC ^f J Uk> £»UjJl 

. END 

. g*\lj\ Jl oUi^l _, ^j-^Jl JU-aL £«~o* c ( aJ&^^L. ) REM iJLdl 

:** 
150 REM ROUTINE D'ANALYSE. 

•j* AUL. ^ -^ oU J jf REM J Ijlp L. i JL jl ik-lj; ol*l>Jl J*r 

JaLdt JuJbu - 3 

<*KJI ^Ul ^SUil ,>._, . = *~JI ik-l* dL jb ^J J JiUl i*-U Jt^" 

• [A* +J~*\ ,/j c W-=JI *A J 1 LET 

: ^Uli JSLiJl 

LET »,, »j «', = •« 

L£ t JiLJl ^ , jj^l _,( JL^c* t ijU ^ xj o^^u ^ vn..., V2, vi £~>- 

lil LET JuKllj t J^»lj» ik-l^i Til Jvail <j*J . >-Jl o~* ,> bj*j* i>j*S it 
. jkJl <>lJLi J SJb-lj 5^. t5j-- -Mj3 01 v£ ^ * cUw'.ol 

10 LEI A = 12.5 : ^ 

20 LEI X(K, J)=A+1 

30 LEI C, D, E=10, F=5.3, G=K 

40 XT, X2=A, H1=1.5, Z=1000 
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Jo*pH i,J ^>i^« 


, Sjj^Vl oJLa JUni-L; jL«Zi 4jj>dl &uv» 01 Jl li[ ^r^J 




. dL jlj AiJ J = SjLi'ifl jl—i Jl urf (>• Ai-^xU 




* jJLl ^uUJ! - 4 




4i^JLlolyjll_4.1 




: iJUl ^ i^l oljJjll 




£•+' + 




C >JI- 




uJ^oil # 




<Lb~jul / 




• ( o^ ) l A * * 




: Jili.1 


X + Y 


YjX^** 


K-l 


1 ^yailj K (ijjiJl 


A* 3.5 


3.5 £Lu*ljj A i-jjv» 


G/5.1 


5. 1 ^ G i*~i 


X1**K 


Ksyui ji^i^xi^ai 



Siy.jJL| JljjJl _ 4.2 

i^li-l Kt-y^- iJjyOA jSdj t ^ iJlfi t»«sM j>.^j "^j . AiJUl J iUISi* ,yij 

. JljjJl eJL* ja 

SIN(X) 
COS(X) 
TAN(X) 
COT(X) 
ASN(X) 
ACS(X) 
HSN(X) 
HCS(X) 

HTN(X) 

EXP(X) V-I^b 

LOG(X) y"^ riJ^ 

LGT(X) 10 JJ^U. ^.jIpjJ 

SQR(X) y^'j^ 

RND(X) iJlyiP-OJloptaJv. 

JNKX) X^^.^ 

SGN(X) (ilU-l^^ + ljIO.^hxS 

xjumii^aJi 
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ju«x^i jt> &J 



10 LEJ A=SQR(12.5) 

20 B=EXP(1+X) 

30 C=LOG(Y+2.5)+LOG(Z-3) 



J^jcJJ ikJjj SUdil JjjJl . 4.3 
■^ ill All »i* . DEF i»JUJ| ik^ ^Ij^ J SJL, Jb- JljJ tJ^ -jSUil ^ 

. FN (jviji-l -j* spLi 

: as,f 

10 D£f FND(X)=1+X+XxX 

20 L££ FNA(X.) = L0G(1+X)+3.5*X 

110 JLEl A=FND(B-4.2) 

120 C1=FNA(D1)-FNA(D2-15.7) 

• e" 

Uk* oljJ> _ 5.1 
ii%Jl cj\Jy tf- SjLp ^j 

>JilLTjf< 

JjLuEQjU 

Jjlujf JslLEjf < = 

JiU-jf^fGEjf > = 

.. ^LjJb^NEjf <> 

JLaku juUj - 5.2 

- -• 

: y> (.UJI JSCiJI 
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SisJ 



A<B 

X+Y-1 EQ 

1*3.5 <= SQRC1+X) 



IF i*J,dl jLUl J J»«i«j 4, jL J ijikll ^UxJl . PL / 1 t J^jS" «. OljJjy 
^ubdl ibS i^l Jl SUi ( Uj rj £. OR i AND t NOT ) Ukll ol^l 

. i»UJl iJikJll 

oljJjll i^jf j«UJ! iL»>- _ 5.3 
olilJl ^ J iLjcJil ^IjiJl l^ ^a BASIC ^J J jjjLdl iL»^ JLtly 

■ <J'jb> J^JI J 5.3 Sjrfl l^ti ^5-ljj of ^jialJ jsJj . lS^Ji&\ 

t 

^IJ^JI OljjJb *_5^x3l » 6 

&>jjds» jjp ^^ - 6. 1 
'Jh~Jl GOTO s-ty. 6.1.1 

: ja f Ul J£jJI 



GO TO „ 



110 GO TO 23 



GO TO n,, „ 2 , ...,„, ON x 



uj^-^IIGOTO^VI-6.1.2 

: y> f Ul JS^JI 



M lib . i iUU x ^ ^l ^i & B! nj ^J jj ^ ^," ^ 



^t. 



240 GO TO 15, 20, 260, 310 OJI K 
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h Jr ii\ gji£\ _ 6.2 
: f Ul J£iJl 
LE v op y THEN //, ELS E n 2 

j$* y> op i ( luMjLui t o"^p*^> 4 t^ljj ) ajj-^-^jIju -jc- SjLp ,y> y, x 

. ( i«--jf = ) jk-uVl /»Ujf Jp SjLp ^ m, n2 

iJU-l Jj . n jU. II Jl j-w -^JLi «. LaJ»?- J&* -U ^wcJl oL5 li[ 

. n2 Jl ^ i 4-5U1I 

t IzIp ^yUn-'.ll jwdl l)L5j t cJL^f liL? . tSjL^-l j-a ELSE n2 ^Jii\ 

: il^f 
110 If A>B THEN 250 
210 [f X = THEN 300 ELSE 10 

rcjXi jM l1jIaL>- _ 6.3 
FOR iEXTy.Vl 
: y> aUI J5C-2JI 
F0Ri'=.vT0 i- STEP r 

NE_XI »' 

. ij^^- ^jUj ,y> /., y, xj (Scalar) i**\f\ V aJj>^* ■y* SjLp ^ v vl^>- 

. y. JjUj SjJaiu y awIIj x <**£]! On Sj^>-jil v A^iJl pt*^r *2LJ-I jjJj 

. y. ■-.: + I ^ t 4lU>l ^^r li[j . ciJ^ly STEPz jh-j«JI 

. oUU-IJ^U^jSUil^- 

. Lfci ^S^. ^I J <aU-l -j* ^jj^ 1 ij 5 ^- 1 (>• - 

. &JU-I J>-b J v JJjJI i*J JjJL~ ^xc _ 

. JuLU J^-Ijl. x, y, z SiwjJl oljJcilj jubdl Ji-A*; ^ _ 

. ( SiX ^A 1 ifij ) isU-l J*b Jl jrjUl-l <y g/dl ->il ^, 

. oUU Up ^1 o- NEXT J^lj /i ifk- 
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«U 



100 FOR 1=1 TO 15 
110 LET S=S+I 
120 NEXT I 

200 FOR X=0.5 TO 22 STEP 0.1 
210 Y = SQR(X*X + 1 .2) 
220 PRINT X, Y 
230 NEXT X 

300 FOR K=10 TO 100 STEP 10 
310 FOR N = 1 TO 10 
320 LEI A(K, N)=K*N-1 
330 NEXT N, K 



GOSUB «. 



i^Ul _ g^l^Jl _ 6.4 
V-JI GOSUB yi\ . 6.4.1 



j-* < b^Jl OIjuJ o> j^ cJjJl ^ J . n iJUJl JJ pi^dl jjj 

. GOSUB y.^J S^JiL. JLJI il^Jl j|yp 

: "is- 

120 GOSUB 350 

^j~xi.\ GOSUB y Vl - 6.4.2 

GOSUB h„h 2 Wj> OJ.v 

• kj?T &\™ j\ j^ -yi ljUy, Xj t ^,Vl ftfjl ^ n n.., in C^>- 

S^JUJ' >_!f ) vj _>i| GOTO /i\ J_^ ii^ki L^i ^ J^J| ^ 
• ^ MyJ j> ^j J y> ljSH\ iu-Xdl .Jla ^ JyiJl . ( ft. 1 .2 

: *i. 
150 GOSUB 100, 300, 210, 540 OJ4 M 

RKTURN^ty. 6.4.3 

. GOSUB ^Ldl ik-l. , Ja, bj J| 0I^ JJ ^ j^'^Vl Id* 
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: ** 
120 GOSUB 350 

350 Z=SQR(X*Y+3.5) 
360 PRINT X, Y, Z 
370 RETURN 



l^l-JUol-7 



E!-^. 



a-UIjJI oULuJl - 7.1 
DATA iJUsJl _ 7.1.1 
: y. fUl JSLiJI 



DATA .„r, r. 



•jfi> ojLp Uajf dj& il)l j^Sj . *4jr^ *^}j? U* ^^ L5* Cn ^ Cl *-^ 

:** 

150 DATA 25, 351.5, 1, 0.5, 12, 

-35.1 ,2 

READ yH\ - 7.1.2 
READ i'.. i), «•„ 

. i^ij^CJ* -jP JjLc- ^» Vn, ..., V2, VI <i->- 

. vi, v.\ .... vn oNpJil Jl JUj t DATA Jj-Mrl {y> n ^1 f/K 

200 READ A, B, C 

RESTORE j»*i\- 7. 1.3 
. DATA JjjJLl j* a-»«-j Jjt Jp .j^jj il~' 5*1^1 jS.y 

ON EODi^JUxll- 7.1.4 

ON EOD GO TO // ; -Ul J£Ul 
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■ ( i*-^ 1 = ) A- 11 (^v 11 

iSy*~* <. DATA i»JV J ( End Of Data = EOD ) oLWl M+ «JU J 

■ f UtU ^->*JI J»jiJl ^U-jI j^J 4 GO TO JU>1 ^^ |j| 

*~>-jUM oLLmJI _ 7.2 
INPUT j,Vl - 7.2.1 
INPUT »„ D2 , ...,»„ 

. £J2jP*Za f]^] j& ojLp ^h, vi, V22... Vp 

j-to J* ii>J| sbVl iiLl Jp fl^i-l i-!jU eLjUl ^L t f U JS^, 
Sij_yi oV^ull v-ldl oLkdl JU^Jj-iPjJi Jl ^JUJb jug INPUT i»JLdl 

. INPUT j,Vl J~ 
iU^-L l|Jl jLSJiUJl il^ . j^iy a^lj, oLUll J^i' 4 Jb^yi j^ 

: ** 
130 INPUT A, B, C, X 

PRINT ^.Vl- 7.2.2 

PRINT x„x 2 ,...,x 

J^Mxi^l^^.o^u.jfoV^cC.I^Vx x,,x,^>- 

J^i ) J.^ j^ U b ( 220 J-dl J ^ t j^j ^ j^ } jj^ 

• (350>\i. l <UU_ ■L.lijy^lj, 

: ill.! 

220 PRINT A, B, C, D 
350 PRINT X; Y; 2; T 

PRINT j.Vl auj, '^-j, ^u, JjL ^ ^, ^ ^ . ^^ 

^uu jnjjii ^. u ^mi ^ j^,^^, t j^y, ^ V j | 
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( <*>FORMAT J\ ) IMAGE iJU=11 - 7.2.3 
PRINT USING jH\ £» i<Jbd l •■** J*-^" 

: f, .v, r 2 .«2<"3- v 3 — c..*. 

^f J* tfjj- jf -_/>Lc t oUJl y J~-%- 0* S A* L5* Cn > ■■•' C2 ' C1 ^ 

. ( J*r Osj ) # jf i»- 

: ili.t 4 ^>^l S j-JI . j-JI cJ\kAy & 'A* cs* Sn > —■> S2> S1 

« # .* # (f u J T4 ) 

_ * * * - ( f «jl «*j yLil ) 

+ # # ( Oi*»jj lA-M ) 

##.### ('ij-S *r* 3 i (lijf 5 ) 

- # _ ## ( iL^lill JOu 2 4 *l»j? 3 4 ojLil 1 ) 

: Aii,f t E J^-SJ1 J s J~JI 

#.##!!!! 

- ##.##!!!! 

• Sjlilj K _• as^~. 4 10 Sji cAyj: Jo J Jl ! ! ! 1 v^ 1 ^ U ^* 

: ai.t 

230: "VALEUR=" **.*** 
240: *## *.** *.* *■* 

PRINT USING y>H\- 7.2.4 

: f uii J£JI 

PRINT USING . » : .v, , -* 2 , • • ., -^ 

jj^L-I ,y> x„.. X2, x.j 4 IMAGE wLoA 5 V" 1 ^ 1 A" 31 r i J> AI1 ^ 
* * ( cM&v c-jIjj 4 oMj*^ ) 

: ^t 
100 PRINT USING 230; X1 
150 PRINT USING 240; A, B, CI, C2 



j«*Ji 4s jiJi jji 4-— at* J^ ij* d o^' W*" *** <•> 
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ON EOF 4*JLcJl _ 7.2.5 
■ Vf-jl^l oLJUjJJ j&j ( 7.1.4 ija ) ON EOD Ji. J^jC-J i«Jbdl oi* 

O^JU-JI Jp oLJUjJI _ 7.3 

. f^lj jjSi jl -j^fj . FILE i_iJUj ik~ilj_i lij o}k>t~Jl ■j*- rj*0± ^rj^- 
•^>-j-i . V^ jf ASCII iJLy^ J Lsijf jj5o jf -jS^j 1,5 . ^ylj-tp j\ i},\yj> 

. v»iLaj <Ublo ASCII C/)k>t~>i 

|.Ujf i^lj.. ^ t WRITE-, READ fU J^ j> iL^ul\ ^.IjVl 

. OUTPUTj INPUT jf , PUT, GET UUj t iJikll o}U~Jl 

. ^ly-Vl _ JIpoVI oLJIS^I i^ l^-j 
JjUJL.| Jp oLLwJl _ 8 

jf U**J Ks- £j*uj i ( ii^a* ) -jjJUuj jf ('4^. ) -o-lj JU-j JjO>- JS 

i-^>L> cU«- j J^^JU, ^JbJ jf •■■& , ( piM i^Ldl ) J^ J-^ 

. MAT f-jj ( yi oUyL/dilj 
jf ^^-^ U*p jjSi jf -jS^, . **y>£. J J j JlJLl Jp Jj; i,JUl .1* 

MAT PRINT, MAT PRINT la* L, ) MAT l^Lj J_& t dJUJJ 3U| 
U-» ^ V jf J^i, » J-*=*ll JjJO-l Jbuf JJ^J JLoo" jf -jS^' ( USINCJ 

10 DiM<30,30) , Y(100) 

110 MAI X=(12) 

120 MAT Y(50)=(LOG(A+B)) 

210 MAJ X(10,20)=(10) 

12^01^1^ no i^Lcll . yjxJjljJLl^^-,,,^^, 
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J-SLi-O^- 120 i*JuJl . i^Ji\ .J* J \j^ 900 ^j t x J^WI ^ J} 
^^p JS" J[ i^^Jll v>U|^J| i^l o/ z^ a £j \j^* 50 Jl Jb-lj JOu, JjJbU . 
10 Jl x oi-^. Jj^-I J^' JU~" 210 i»Jbdl t U^l Jj . ^,bJ| oJL* ^ 
V>l/I^Ul wJl ^vjXp 200 Jl dJl* -y. J^ Jl ,y^-j <. SJU^f «10»j « jk-f » 

. 10 

MAT/H. = w, ,. 

i 

. ibuVl ^^-LSi. tjOjJb- -j*- SjLc- ^ mi, m2 # 
( i*^ 1 ) (n^l £-*J>j J&t t il> J-l oJlA J . ojbuf J-SCdJ cbbJ of l jS^€ mi • 

. mi JUj SjJlLo ijjkf ,ju jL>u!iU aJbjJpl 

. mi -j* i^tj.1 j*c£ji}\ JjULw»j of -jS^ m2 -jj. ^a^ JS • 

C >JI c ^JU 

MAT in, = ni 2 + hi ;i 
MAT m, = in j - w_, 

. jbyfj mi Oj^J jf ,jiCc 9 

. jLuVl; ife^i jjSj of *--£ m '» hi2,ob# 

. Ill:ij 1112 ja j^CS- Jju j^xl ( rJaJl ) A*JL| *JL** t\j>\, *yu inJUJI • 
MAT III , = 11/ _, * w , 

. ajUjI J-Slij ijbu of ,j£c mi • 
Jl i^Ull ^*»L«JJ JU&I ** t 1113 _j nu J Jjivall »__»_ rw ciil iJL^> ^^ iJUJl • 
1 m.i(p,m)j nu(n,p) ij : iiilyL* o ■>& of <--£ mi,m2,m.ioU>ii*aJ>l iUit . mi 

. mi(n,m) 

MI w,= INV0ii 2 ) , (I 

. l^LSLtJ JUiu of 'j^c mi • 

. AAJljX* jljou ,jA n2 • 
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t * 

HAT m, = 00 

. l^JLSLiJ JUJ Of -jSLc mi # 
. ^Ifl "if j*j«J jf *Jj>c* t oL' ,_,» x 

SJb»-b I»lj5 
HAT READ m^,m lt ...,m K 

. boluf J^tJ jjLu Of J& mi, mz ... m n • 
. DATA <JUi JjO>- J jtu- juw |^k- *u sdjiJl 

MAT INPUT »»„»!„ ...,/«„ 



. l^JL^il jjluj C)f ,j!kC mo..., nil. 



mi 



HAT ERIHI",,*,,,..!*, 

. IflXiJ ijLu Of ±fis *il mi, ma, ..., m H 
. PRINT JU-LclJ v-Ull OaI^I l--^ S^ljill ^ • 
MI PRINT USING „. m „ B , 2 „,„ 

. PRINT USING 3*JUdU LM.\ j^iyJI v_w, ^ ibSJi * 

• ( J-^ 1 jf ) *ji>*«JI W~ (tJj tj» n • 

MAT^ji-fiJUj 
TRN : JjJuU 

CON : SJb-j iijivx* 

DET : jjull iL-s- 

ZER ; yufi iijL^L* 

IDN : iJtiyu i&jLp* 
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. i£lL i^UUj dJLjL ajJJ iuUI a^I jftjJI 

J. ARSAC, Premieres leconx dc programmation, Cedic-Nathan, Paris, 
l')8(). (L'ouvragc, deja tile, comportc cgalemcnt la transcription des 
cxcmplcs dc programmes en LSE ct en PASCAL). 

On pourra igalement ,«• reporter a : 

A. CHIiCROUN, BASIC, programmation des microordinateurs, Dunod, 
Rendition 1982. 



^y 



202 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



r> 



U)l Ju^oll 



* » ■ 

ijU>ll lA-j u» >K OjU ifc* Oj£ Uxp t u-u vV- a J** J ^ 

. jJI t i^U- U^ Oljif c V> ^ ' ^r^ ^ 0t O^ B -» A , 

. Teletype ^ t V> ^J* »J V" 1 ^ A ' ^ ,U ^ 1 ^ ^ ^ ' ** 



^ «D» JL^Jl i j^M JS^luj . Bj A J jJJ ^Sl *>-U- d^i d\ Oj-A; i lj^ D 
4JL-. ^ t^~.U- Jl iijt Stat Ja; j UJISOiIj tr £*Jl Jpj i ol / *^*Jl ,y Cj\j±f- ISi. 



203 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



s ™ 

oUmII Jbj& - 2.1 

. oL-U-l 
Jl ^b>J ^i^Vl JOjScJj . i^Jl oUjJUJ,! JjLJ aJU /.Isjf iojt J[ £-b>J 

i»— 3ft £-. (Decimal Coded Binary) DCB j\ (Binary coded Decimal) BCD 

. ( j>Jll ) iibi- 

JS J 1,5, i oljLi'Jflj , l^>-b»J jJI t oLkJJ JL-jN ..iisy fUiJl IJLa 

'■e 

i^t i (Extended Binary Coded Decimal Interchange Code) Mn. :. .11 
>»Ujf K J^uo^jj . BCD' jj5vU A~-y a*--1 JJO IjS'yk ( UbJ .ij-kII a~>j1I cSj-i^Jl 
J^jcuJ . Ll*i iLxLw. l()y l^ t i£r 4*jaj£ 256 iJU JUL>j . 6 ^» SlJO aJUJ 
tljj^l Jl i>-U- .ilL* 0j£. ji OjJb <, ijUL t— U-l oL—i JL.j^ UIp ijS3l IJL* 
. J>Jll J ijvj » EBCDIC JL.j£Jl JjJbr . JUi-lj i£)il ^ J^ ^ 

: jL>JJl J_i -y. SjiLJ.1 j j^»- c*^ (IA5) n"5 iJjJJl V^Vl o^t 
1 (Comite corisultatif Inlernalional du tclcgniphc et du telephone) CCITT 
. oj-^f SJji oLp^ufj (Inlernalional Standards Organization) ISO o*Ulj 
a_jJI>iVI L. I . JI_^JbJl t y r i J _«Jl i^Jl cjL»-Ip- Jp iiU-'jU Ujjj^laj &J? Mij 
jjJl : (ASA) Americain standards Association &>JU ^j* - o* c>^* »«IjJsM 
AJj^dl «, (Americain National Standards Association) ANSA liJUi JL>y cl~*~p\ 
N_j . (ASCII) Americain Standard Code lor fnformati' i Interchange *--^l» 

. r — *yi IJi,. Nl OVl LiyJ 

^^1 J ccrrr t>JJi jj -^ Lv ascii "L^ 1 J** <5j=r -^j 

. J>J1I J i^j- y. AvSCII JjJb>- . 1968 
JLjj^M a*j~* - 2.2 
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j^Jl J jj-LSj . { 2 J££ ) ik--Jl JjU^II a* ^jSfi^Cn*^^ 'fr* 



(Baud) 



20 ms 



+ V 



-V 



\ 20 ms 20 ms 20 ms 



js ° 



i 



i 



PU 



20 ms 20 ms 30 ms 

( vjSj - l3^U»J SjliJ ) Ol ji-jC Jjj-U j\*^u _ 2 J5LS 

i-Pj-s 4 i-IlSlJL. 20 ,y> ojL-p ,j» 4L....II SjLSNl Uj- cJtf lij i "*U 

i " * 

J* J-* • jptf l»jkj>- J^-ji I JA . JaiLl IJU SjiUl olAijSJl cjjlkj o^L. Jkjj* 

4800 t 2.400 t 1.200 ^ t ( Telex ^ ) 3j_. 50 ,y faju cU,- JLs>-|.J 

jL-jyiAP^-- 2.2.2 

Vtr = |log 2 ji 



+ v, 




5ms 




5 ms 




+ v, 








5 ms 








5 ins 














*-v, 
















-v, 




5 ms 







5 ms 5 ms 

SjUl JS3 ^ . 5ms ^ t T t Jik^ ijUl JJ ;j, 4 3 jsLill J 4 ■*, 
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. n = 4 fy L>w . - V2j - Vi t + V2 1+ Vi o^U-l J>& ol ik-.; 

1^ «. iJU / iu 400 ^ Vtr JL-j^l 1*^ b\ ^ <. (1) Si-*Jl jJal ik-ljj 

. i^j 200 ^ ,jtwLJl APj— 

+ V oNU-l Jb^b jt ik~Jl SjLi^J -jS^' 015 <. ( 2 J£i ) 4iUl ilU-l J 

. log?. 2 = 1 jV 1 O^-^ 1 <* j* £• 'M tJi 1 ^ JU/ill *c-j~> . - Vj 

S^aULI J,jk)-|_ 2.2.3 

jt -j-^r ik~Jl SjLi'yi t ^ 2(M) ^ JUjNI J iU*i~. ^ iJ ^1 «LiJl 
jt ■_/£$ JL-j^b * foil-duplex J^J^jJL, £*~, IAa, . - 48Vj + 48V ,jcJU-l Js^fc 
• ( ui* 1 ^ <if «W* Vrlpjl ^~ full-duplex) JUi^ 1 u* ^^ dj& 

: iJUl oUajLl jSl r ilU LJ> J 
ij5 t ^ 50 Jl o^L^jX. j^-I t ( CC1TT V 10 Lr £k ) UjJLI vlr^* ^ - 

. oll^- 5 Jl 2 j»ij CCITT 
. iJLJU iSLi Jp 1 ijj 200 (j-SU; _ 

. 3jj200 Jjs- oil Wta^ai- Jsjk^- - 

duplex AJwaJl j Jj-. 2(K) ^ J^JL, ^ i c uJ^.j^ wWl SUIl ^LiJl - 

t (CCITT V23) 

: ic-jj.\j J**x~*U fcb i^w»J.I c is«UM o%^JI - 

t jJl t full-duplex c ^l>l oj-udltf^ 1 c SjjU Vj^ &j^ +»J u* V" 1 - 

. jjj 2400 js- 

. J>; %00 j*. * GJ -JI JU-j^J 1 (M. 102) S^r v>* *M 4 u* -M^ - 
c (M. 102) 5JL»- v>*J «M 4 j, J>>~ iAJJ *^i * DADUCEE i£jJl - 
4K(M» ^-j c M> 0- > U lH* ^ j ^ 72(MM) ^ J*^ 1 '^ C*^" ^ lj 
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. ajj OjJU I ^^f Jl J^ ££ 4K -j^ 
^L-f Jlk; J JL.jMl J>jki 

■ i_r s, '^ : " (***f* ***~"l ■>; 
JL-jVlo>-2.3 
Ijj ^ : SJUo iilwi Jl ijj^ i*^ ^ ^ l^JU; jS^' V fl.k-ll *,LiVl 
t ijjw iaiji w- if^, J^d IjLiyi oJL* *ai«^J 1 I JSU. . IfcJp Jjyi t|^.J 
• JP^ &-*lj> jl -k,/* ikJjj IAL-jL v_J^ ^J| ^ iiA^ali i»-jll oJUj 

^ ^jt*Jl (j^sddl - 2.3. 1 
. ( 4 JSCi ) -*L*)\ iMjdl iu- SjLiVl j 1.x 

o*\j*f c* > ^V 1 ! ^^ ^V s c ^k^" 1 ^V* s?* r °1 ^ '^ 

<JUoVl oJO^Jl / 

. i^willj iJL.U-1 -ju J^iJl / ■ .v 
. J»^M «^ Sitj oa,. t LUi f-s ^ JUjI ^ Vl J^fll -^ 

(^ p* jJj • f -s J* JU»5 jf Vs ^ f&>\ JLL . o»«ydJ Jlk5 I + sj 
pi! . J*M -^ ^Vl J>JI ^ ; j^JL j*yj| |ji VI C U-JL (filler) oLiLu 

f + (/-s) = 2/~ s iyi^dL 4JJL: ^jji 



- ,j~i. J^l ^ (modutatcur- denxxlulnicur) modem ^ ^ufllj Oj^dl. f ^ ^J| j|,Vl 
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SUM SjLiNl 




SjiUI ij\Si\ 



■ sy—JI J^wdl **~p _ 4 JO 



2/-* 
f+s 



^ 



■3 



\ 



m&& &^ 



^ 



22 



0^11 y-JI^Ll tSlkllj JU/Jll U-,* - 5 JO 
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*">Jl; iIm-soJI _ 2.3.2 




/» /i 



./<» 



t5-'^ aJl uWdl_2.3.J 
7 JSAJI . Uj >j t ^ ^u, ^, ^. ^ .^ ^ ^ ^ 



•i*~*jj| 



yv. 



.Li^l 



OcJl 



liJI 



(IfcJI 






\ /A / 
\ /'l / 

i 


\ / i ■ 
\ / • 
\ / < 




j^i^' 





J>Jl uy*^u 4^ . 7 JJ^i 
b 3 '.II 1.1 l„ JL.J>IJ^U.».Vl-2.4 

J- ^ jwn ^ f ^, ^ . -IW . ^ JUj , • - ^ 
**» W ^ ^ ^ ^ ^ 42S a... 
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. ( SjJuJb ) ^Vl jJjiJIj ( i^JL ) 
jl^u- jb> % . i— Jl Jl LsUil o AiLilj ^ 1»^J| ikJ ^ JJKJL jJjcJI 

. 0_lpLflJI oJUfe ^-Sou A— <uu ol^P- jl 

J^ ) .^kjJ-l ,> i_«'Ul *lk^Vl iJL^ j ^ ijJcll .Jbk ^^1 *lJ| 
J ( Block Check Characlcr 3 \ t BCC ) JJjuU iUU iw Lit t-jwa IJJ 

. l£j^-M ,j~A> jj objl «*^- Jp t Ja>- JOu Ua^- j»^— jJ-fcJl . oUjJbd.1 SjJlS iLi 

-fciti 4^-J jljSl _ 2.4.2 

« I » OlJI JOP iL~J 4J jj& J£-£j CjU~J| ip^oJt i_^5y t AlkJI IJLa> J 

■yi IfcU Jva^ ol j&r « I » olJl ^y. 3/ 4 4^-Jl oli oL-Jl APj*< t tAi» 
oIp^»->J.I jJU- itu-l y <uip. Jvi>^ iilx>J.I oL-Jl i Jp . iJLo *lijf 7 JjjSi j!A>- 

„ i • P Jl P fj^y n <y 



c' 



/» ! in />) ! 



La ) i»~Jl J otJJ J-l£Jl iJoJl y> n olf I ij i 35 5JU-! »Jl» J L5 Lu« ^JJl 

. ( '()' ob iu^ i.1U)T obJJ J.l£ll i joJI y> pj ( 7 

i^jJl ilj^ll _ 2.4.3 
. JU*^I xp Ul>- iJU* jtf^l *U^Vl LJLt^l ilj^L dUi jio 

Jl; . liiL* iJLtf- >>JLp Jp -W^JiJj jUo ^lil XJLxSoLkall ^ ojJli ( _ r <Jj. "ft' ., U 

- ^ ^ 

j,— ^i t jLiu-Ml Olo . oLLwil oj "a* JIxj o^Li J^-jiJ I JiSjJJ 1<*J «~*|5i i«— 2il 
■j£j 1 lij j . jJUll U J6 Jf- JJ^JI «ij jjxj SJU»Vl 5jJLi3l -jj. iiJtLl oLknil oj JJ 

oUkJl JL-j| ol~& - 3 

cjIL.ojJI - 3.1 
SJa* Jl ik-y aL^jJI _ 3.1.1 
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| y>;bf 



L=i 



oL«^1aj« * Uai 



«IaSi Jbo &* il*> j _ 8 JSLi 

jJljll oXUi. 4JL*, -3.1.2 
J-SLS ) Jail ^ J* ij^ ol>»[ SJp £^ z^" t -L^ajLj j jUi-Al 




iiUjJLw »Uau 



jsijiibjus.a^j.»jsuii 
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uy^* 
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jLil/y- 3.1.4 

. ( 1 1 JSLi ) olji; ji jjl*. ^ 



iJIaJuia f Inj 




jUl^.HJSLi 



- ^>Vl 

JjJUJl - 3.2 

. iJL» »Lifl <u~Jaj t* i. jL«j<Zo»I jS "ill y>j i (jliJl . O-sj*' tk-~'j 

oIjUJIJjJUJ- 3.2.1 

. rxp-^> J^wj t-JLUl JLiJ X«- l> j_^ill jLauMl j -j-fcSj 

JJUjJl JjJl; _ 3.2.2 
o^4-"r i Jii-V^ 1 f ^ J! J+-X ( oU-Jl jj iJUL. ) ^L-^l . jlSlI |»UiJl ^^ 
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*JLdJ iyL>- aj jj-Si JSw fUiJl J>-b J iJL-^l by£ . iJji-L. j\ lj>- ^ 

. sj^jl. iLcJi ^>JlI cjis i •>! f ikJi ji jju^ji juji x* Li, ^^j ^ l 

. i^f v^ jjLi of ^ jjl.^i _ 

. £)l 4 oljlJlJ J*p aJUjI J*. J^J-I jSUI -^ _ 
r**^ * p** J-if *l*»i- oU5 jf t (Pai|iicl) pj Jl oU^Ul «jLi; 



1 







i 





J 



'I 



8 16 



.12 



32 



—■> < — .«— - 



D;i204H 



(bits) 
16 



^J^'0*Jt-I2JSlA 



. f UiJl ik-l^ J^,. J5H, l^U^ ^ t jljuJl 

6- *4 ^ Jlu-i *, ^ ^ . ituuj j^ ^ . ^, ^ _ 
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(j «>j JLJ . ^jVtAjui ~SjZ -ibyjA ij^S 4x^uj (JLvOjI <Ua^il«j 4/Lju& 4j<-*~j 0>>L*9jlJl 

. iA-Ull 7y\j$ Jx^-J j\ « J— JJ Ojjbu illlA 

ii^tJi JjL-^>- Jp I jjli #UiJl oj£> ot -j^Lc c iJ^U* iiis- J-> (j . J-<a»i jif-J - 

. (.UiU iijil Wls^l o")U*>dl 

aj>1I Sbtllj fjAjLl uy JaUll U**_ 4.1.1 

: Jldl JS^JI Jp ,LiVl ^ J*^ J^j 
. SjjjJI J «prct» i^i ojLij Iji* jla^j 

sbVi ji>- *_* p\ v-- 1 ^" bJla • « Rcatl y J*^ » 'J 1 - 4 ! "JJ^ 6 cW P*^ 1 " "^ 

rtjijil J| « Ready for transmission JL-j*)U y>\>- » SjU.^. JL.jL piu- jJl 

: ojjJIj ( ujiJUalil ) *d^jil j -~ i~* bU 1 .1,7 ^yl^-l 

Ready Tor £Ji >-j*L^- i 1>L-M B ^^11 Jl J— r 3 - A ( «- i ^" ) r^ 1 - a 
; ii^ 1 4fof A ' JUu-^ 1 ^^ ii » r-^ 1 ^ ^' ^- " * cnlission 
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a) 



b) 



d) 



f) 



g) 



h)- 



AetB 


iyl>- • 


A ct B 


il*»j V24 
i Ready ^*L>- 1 






AetB 


Acl B 


JL./AJ ^.U- 






A 


A 


i^JJ^U- 






A 


it 


I a.L5^v* ojU^l i 






B 


H 


*iJU.i*Lr 






A 


pi*** 
A 








A 


A 


uui£U ( oLLu i 






B 


B 





<J>)I SbVlj ^jU Os JiLdl .klJ JJai . 13 JSLi 



B<J>ll c ^^(liU^)cJjJl ( >« j) JiJlaJ jyk, jLu^j ^ A^ojll.j 
. dJJ IjaU- ^f ai 4 A 5J>JI ibVl <„a rj i t jLc-.^ yU- ^ r J 

. B v>Jl 8bVl Jl l^j 1*1^ 4 A & ifll ol jLt^l JJa-, H ^1 _ c 

. sj^Vi ^f ^ j,^ ^u Vy v>Ji sbVij ^i^ ^l j-yi juii 
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V 24 jail -4.1.2 
u-i3b ^ij Sjb JSJ t JjLJI oIjIj -^ i>JN J* (.ji- CCITT V 24 iu^jJl 
apj*>J.I . i«Ul oIjIjUJ v»L. ^ ( J(M) iULJl ) JjVl aLJUI '. flijf £%' -^ 
ii-U if flijbU o~J . i^'UjJjVl ^JLLJI Jlj jj i^L, ^j ( 200 SJUUl ) iJWl 
ISO oUy £j?~<*>» ^ Sjj^-Vl <!ik i o^jll Jp ^ytli V l ij^ 1 l/f^ 1 £» 

. ( ISO / TC97 / SC6 n" 315) ) 

. V24 i^jdl v-J^I oljIaJI y>-y_ JUI J j J^l 
CCITT V 24 oljl JJL a]^ Wtf 



SjljJl j»ij 


SjloJl jh-I 


101 


lS'J 


1()2 


SjLiNl iijc 


.103 


*LjjA oLluu . 


104 


jl a 1 *. . ^-ll^p . 


105 


jL.jj._Jl. 


I(K) 


i_JU;)aI»- 


107 


J^^-J 1 *^- 


108- 1 


■^l < >j^ t W , 


I0«- 2 


o)*U- XJi» !ta( 


HW 


SjLiNI JLji«i| (oUimi JliiJl 


110 


SjLSVI v^ «JU£. 


111 


JUijMI ***j-J ilii* 


112 


JL<jNl 4Pj»J ilii* 


113 


O-'j 1 


114 


^y 


115 


o*^ 


110 


jUai 


117 


jl^lJJ^ 


UK 


iL* ja oUuu 


ll<J 


iL-jll ^Lkudl JUu-1 


120 


■**=*"' (j-* *J^1 0*Jr^* <J"*jl 
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121 
122 
123 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 
134 



J»t>- i3jC- JUS 

fcjc Jltf Jp Jjlil JUu-] 
SdjjJI SjLil Sjtyi i_iLi^« 



J 



( «_i^u _ ^litf _ .^a, ) -aajll «. 4.2 
i»>t Jp J2UJ «L15 ijLiyi .i* a*. Qji J&i, t Ji^JL JUjI ;bf ^ i^U 

^ £ v«,bi i^ii^ jl yip ^ ^ jtj, o£. oi t ii^Jl.^ 

• -#J **.^ 48 j- ^ 300 ,>. t JU'VI iaJL-j oUlS^l 

: l oil* 

(,/lSV) IIzjijAllBO 
l^- JUi (' JW ' !' ) 1 1/, jjyk 980 

: 2<5UaJ 
(,/iir) 1850 Hz 
JofJUi (^'UIT) 1650 Hz 
217 



J.I.I'. I.. '.IJHI.IJ.LI.il J Hi J.I I. I„|.' I I. I l .l .lll .'.|., l|. '.II: 



iiu* oj& if o>> jj-wi ^w j* ^«> JM* cr- 1 ' c ^ °^ J J*"^ 

C--. «Jl J j* jLri-1 10* ^^i "v^n • '-^ *W. G** </ r-^ 1 ^ 

(Multiplexor) y}A\ - 4.3 

. L|l#- ^-pcj JUS, cl^l^J^i J^j^^^ 1 ^ 1 
c^UjS^^j^SfJ 2 ^ /l^^ t ^4800 J t2400^y>ljU^J^-J 
Lol>l ) ty 200 ^. J*>^ Up SjJ- & JS^T t ( ajj 200 ^ ) isii^ 3*r-{ 

JUL- j£isl tfjrfll £• ^ V-J 51 ^M 1 **» Cf h >> J* • **" V-j s -*» 




*- iJlp «>j«>J fi*J* 
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Sw/Jy jj-*JI - 4.3.2 

Jp jaLJL-1 j\j3\ JlkJl ,*-~Jl t oliJjJl i«— at j\ i Sm/Ju jj-Jl &r^» J 
3400 Jl jly. 300 ) J^bJl ^Ul JlkJl 4 fa i JJ&J.I olSlkJl -y. j^p Jl iai-l 

. isii^u ipj—j full-duplex pjj ,y iUoj 12 *!>>-li (»•>*> 
Concentratciir oljS^Ll - 4.4 

. # fi * 

: 4JUI ,j* oljS>l ally 

! jLuJlI OI v»a>Vj W ... H .J TtA-mJ _ 

. L&jiyyf jLyy j .ik^vt ^^wuj oLt^i 1^ „ 

J ^ ) i^i : UL-jj Vj lkJil oLLJ.1 Jp t SJUt^. t oU-U. ^J l^ „ 
J JkJl au- J J&JiVl Jp &iUllj 1 ii>Jl ^I^Vl jL^il ^a: Of l^ _ 

' . jJl t JpMjJI JUjNI SjIpN «off-line» 

S>-tdloU-U-l-4.5 
JJ AP^y oL-U- -jp SjLp j^* (Front-end processors) i^ldl oL-U-l 
V^J • !J s~ Vm~ *^i 0«j Sj^Vl oJU'Oi; Jfi** <■ i^Jl *=Ll*H oL-U 

VWUl; i^ULl JUp^I aJLLw J ciU.U-1 sjlpU U»Ul oL-U-l 
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AJ>S 









-tf 


J3- 




X 














<: 












■ — ' 7 




CO 

a 

u 

•a 
o 

• 






S 












' 


( SjUjLm 






_ W 

- H 




.lSJS^S 









i oU— *UJ1 jf JUoJ : oW^Vl Jp. i^l^'yij t ^^ OjJO jf £* (3jikJlj 
i-i^Jl <• ^^ c tyjJj 1(5 . S^-I^ll oULp jJU; t &*>H\ U-Uy ciUt^l 
SjjjSJI a-p^JI iU^L dUij t a>I_£*II ii>5l olpVl ap^ ~ y^JtySj^l 

. AJjUJl (.1^4 Uajf (J^Jjj ^ . jL**5 A^>Oji a\w « iijUlljj 

Jl JU : ^jj( so*. OjSj of •_£* o^l^Ji . ^jSjU <_~,U-l ^ JU;Vl jjo; _ 

. £JI i ajjS/II SjS'lJLU p-jL t JLi 

^^ cK»yy «-J«jJ jf Ji*P «i>jJ>- aJU- j l5jS"jll <-— U-l J|JU*-I C^U-I (j^o 

. ^Vl IJia 

Jlj^-1 xA\ -j^i I j£* . ( i^Ul aJU-1 J ) JuS'jdL oU-Jl ^j J jf ( aJ> 
^ji^ J iLSCtil oJL^ *^. •jJ JU- JS" Jp t «JU*j AiL*. ^. Jai-I Jp jUll «l£S 

. oUI>-Vl Jp jUkJl i»>^ J^SLiJ I^ISCL il^l Jj 
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(TERMINAL) Ujal\ oljiVl - 5 

ap-j-^ jH^I . JUo*] JUidl^jf JJi Ijl^t ii>Jl $*% ^ 
iA-la* oljljj flj^li : oL^U-l J jft-L-f j-a»S JUlmj i iJa^uj 4*"j-«i J' 'U<ais^» 



tf ft * 

i^-jL aijjj ^ t ijLii-l iJjkJl CjljiVl i_-Ip£?j t <li^all CjIjjVI oJA 

. ?Jl . . . J.VU t ( ^U- JSCij IBM SJ^ ^'j^f ) '*&. <■ *d- ilj J | 

-b>Jj ; oUilJal! iSljlSJil oljjwdlj o.ijJL£ ^ Ajj^kJl CjIjjVI oJL«> ipj^< 

■ : 1^-JbJI ( Jui 

. ( OljiVl eJL* vJIpI ) 4jli)l J Otw 10 _ 
. ( 4Jjk3l IBM Oljil ,ywj ) iJlill J «*— 15 - 

J* o>li ^ iJ^kJl oljiVl »JLa oUuU» ) iJtJl J l^, 45 ^-j iJliJI J <»— 30 _ 

» .... j s h 

J?JJ J*k J iS-i^k** <■ c&^jyf Jl*«jloljit;j_^_ ) Aolj^l«JL*. i yuo 
^j-J j^ i^r 3 ^ ■kS'-y ik.-.ljj jL-.j'illj p_2; of It1£.Ljj . ( yj^* Ja;j- i ) 
gj~* gyj t (Buffer) ^ aSU S/li ik-lj, iijkJl oljiVl .^oo jb£ . ^"M 

. JLiUl 
^ii ^* jt Sjjly i^Ltu v>Jl ^Ij^^l - 5-2 

I . -uIp jJa jj*. ilj^L ujj JjjJI o^Jj ^'Ui' jiy£, Ul dU i 

f op J ^ oLuUJl a» .. safli^f, Usll J ^ 120 Jl t iJlp oIp^ J J^j 
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oljaVl J L^ bj,. Jif ^ j^Vl !*!>, ijj aJIS^I oli dJU JU aUl . ( i,l>l 
^ ir -5Ul 4^-jJ ^j . ^xUp-1 jl 4 ( ^ i^i> oljjf ) iLfcJL oj^ 

\ a — Hi 

Jp ^>s*5 of -y, *iloi 1 iiLsJl J* iljLil oU-Jl jU^" t iaUl 4JU.1 J 
s^li v^j t ajjj of c 4J>JI ^Ij^l u^J & * ol^Vl i_JLpf Jj 

JL^VI J s^ saJli oli ^j «, l^JU^c iuU ^ U.IL, v>JI oljjVl 

fe^i 4 dxm aui . olui ^ jp j^ai ^jyi j j^Jij ^ji *u^i_, 

<a»>JI OljjVl J_p iLUu- ^ , J_*AJ| cijJi J ^iij i^iyyi iJL^l 

,5 jst-f 3j»y» oljaf » 5.4 

V>ll-Jc>— dl Ji^lv- c oU%JL jJjbOJ aJjJJI ^Ij^Vl : l^u/Jdj 
t ap^ t JUivi c Sjl^ ) iy'LjjAll ol^UJJ iki^l Jjyjl oljiVl c o jUJil J 

..'jJI.CjJl 

■y cjUjIiwJJ oj-*LUj «Jii jlj*^ fjj'^ ^-Uf jSlig yn JUi-l Sjl^ Aj>\ 
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. oNjSjJjjJl ^,-iJ t^f IJbJL^ 

ilbk . tfLiJl ^/it^U- ^f £. oLtwdl JslJ Jp jOi of v*" 1 ^ J 5 " i> v£ 
. <**> H.D.L.C d^-i, jLtf ^11 Jill *• : a^JIj v_UOJ o^jU 

. (Half duplex, fultduplex) « JUIS" Vf'UOi bj r j/rtpjl «-*^ » <&•* 
(_$T t (jvftUVl J JL.jNl jULp *I_^-J jjS^J.1 ■>»*■ t uyw ^SLi jj Jai- ij^Jli 
t UaJ jf full-duplex ^JJ olftlj?-! jU*i-»ljf i cJjJl ^,-iJ j JLiu.'illj JL-/VI 

•U£^l j villi JUjj 4 tU** <kJ- J Jb-lj eUl J *3 JLyill i-Jl^P i ~£*i\ J* 

(bilateral a i-^-l>>jJ ci**! ^f half-duplex ^pJU ii»Ulj_^-| *-xi -»j ^j i JUI 

. I'altcrnal) 

Up J^2>J Of •_£? us*^l J u^'-r 1 - 1 J^-yJI * Jljsill Jai-I ^ Jp 

J 4— £ j* JlkJI ^jp 0j-£. Of c5jJr^' Cy o-s 1 • j^ 1 »^' J <J^J 

y\yi\ _ 6.2 
J ,yljdl J*a4 Of j£r . L.l>- V j[ L.lji 0j& Of Jic oUwll jL-,1 

= > .l>aiJL.j'ill_6.2.l 
J a-lr 1 ' 0*jw « (Start-Stop) cjB,- iftUriJ Uuf ^jbj t -^Ijdl JUjNI 
Jj JJ-I <> ^>*Vl j«o sj^-ipi J^jj of -^ s^Vl .iU; . oU-Jl tSj^. 

■ f u J 5 ^! v"l->Wl .y 1 go. IJU, (•) 
High level Data Link Control : H.D.L.C (*») 
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. v*f if JjX Oi^i 'ucu- JL-I Ou y jJl s Jdl : iiJbi olkA 

JlL-JI iijUl oljiVJ Jj t SJjxJl obulkJl J [^ tt^UI .1* J^CLJ 

■ **- J* *U J ( 16 JSC-i ) «Start» ^vijJI J^x 
*1 ^-Jj : ^ JS 0y «Stop» ^^Jl iic4 . « i.^U b jf c JkS '1» Jp fjij 

. Jai-I (Schantillonnage) Sjjbu. olliJ- i^ilyi t J**Jl ijS> 4pL» 
. o Jj^ «Slart» SjLSl^lirJj t ipUl ,_iaj c «Stop» j^d\ JLfc^l ^, Uji^j 

STt>I* START | o , , „ STOp 



-+ 



(E =: 0,5 A/) 



. , A/ , Ar A/ A/ Ar A/ A/ + i: 

_ 1 OARACI'l-RK 



( oUaJ- .j—^u jjj" ) «Start-Stop» JU-jI - 16 JSli 
i U1j i oiy. ^^ (Baudot) Ijsj, aj S 4 J-wcu-j ^IjJ^I JL^ 1 

jl aui i oiy- 8 ^ oiJb (asch) s^vi a* . ascii *ufti f J jxtj 

0* ui-^j-* if.j-*&- ■>• »jj-^-! <-*Jti t^oJl «Stop» j^a^i\j i «Start» y vouJl 

. iJLdl o'UlJl T MJLSLtdl 

^IpUljU/yi- 6.2.2 
£r*u if&ij t iukJl aJjUI oljibU JL-Jb U-Uo «Start-Stop» <uJdl _^*J 

. jjcu-Jl 0y 'stop' Vj t 'start' ^ 
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i-JLill iLS^LJl ) ASC «SYN» olI-JL, f L_p J-££jj : SjJLJJl & JjVl 

. ( '00010110* 

H.D.L.CU.UI.6.3 
t 

p*^ 1 *W j' (Higi level Data link Control) ) H;D.L.C *\j^i\ JL£L- 

fy* ijj^Cc^^Ulj^'bfl ijjU* .(ISO DIS 4335) . jJLjl Vj 1 tf^ J^i 
oUa^dl JLy"if iJlyUl oLSLill jj4b, sjl*JI U-*jl"-JU g^l >itf*l 

^^tHtsS-y- 6.3.1 
i^yll JS^JL olSLJ J^lJb JL.^1 oUU ^ ^ H.D.L.C *lj>-Vl J 



FANION 

oiiniio 


(8bHs) 


OOMMANDE 
(8 bits) 




F.C.S. 
(16 bits) 


FANION 

annuo 



H.D.L.C f JLll..l7j£ft 

lr* ^ iJldl .i* , '01111110' iJUb ^j «Li JS Iju- : Fanion 

. fXll -yljd Udl .0* J*^jj . tfUAJL "ttldl olkJll ik-l^ fcb 
J-j? ^Jl iUll jl j«Vl lfcJ| 4^' ^J| <W| ^ vj^J ^jj| oi^Jl :' Adressc 

(#J^ • ylj+l J* jf j*Vl <> Jo; cU>w Jp^VI j^ ^ : Commande 
. JLyVl uy. J^cJll (trame) jJLjl ^ Jp Uj 

lj^* 16 ,y aLA- : r LJli jjiUdl «Jh* jl t Fram Gwtrol .sequence F.C.S. 
. ^jUJl fcici &> Jk-i^ ^ui ^.^ ^ ^^ f ^^ (^ 



e^r^. J H.D.L.C dj^l t VV «* i>M * . BO jfli, ,y> ifjU ^ m-tl oU>dl (♦> 
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^11 o'LiJl o^iJl .UJ1 «fonion» 2 Oy a^-jll jJLlI & ^ JS J ^jj^JI 

a* y l=* J* •**> JI-jY 1 ^ '°' *=! JUi l J* f>" S J*^I *W • fanion Jf ji/ 
ob 5 & <Jlxx- *__». '0' o JS ^ JLfc^l xp t ^^Jl J*j . '1' ob 5 

. '1' 

H.D.L.C £ji j* oUI^I - 6.3.2 
«!*--•* u^J «• oWjVtfl -j- la^lj U^ Ijuf ci^u N H.D.L.C. jUll 
cj^SiX £* ti£&\ oUlj^l & iJiP ^yj bl£.L t 4>yr% y> IjVl ,y ap^ 

olWl £jj _ 6.3.2.1 

jt iJa>j.i i^-fj juifj <j,f ikt ikj^, iL-jii ^ijVi ^ j aI^Vi ijJJ 

«JU*)li3>- 6.3.2.2 

ik^l -^ Oil. Nl oL^U <> ^ J^L. J-ji Of ila^UJ -jSLc N 4 ioUJl 
j-U-Jl Oji oL^Ul JL-jb fju- jf ik>«AJ ^ . 4^1 jdl ii-^Jl J . aJjVI 

^VlJi-JS^i- 6.3.2.3 
JSLUI J Jsudl JSLiJI ^^ jJi\ J4>- J ^ v ljJL| jf j-Vl fj> i-iiyJ 

18 



iju-jji ^ t 


1123 4 5 6 7 


&OL. 


1 oUjIm J*Lj c 


N(S) 


P/F 


N(R) 


].N(S).N(R).P/F 


S iJI^ "-j'^t" / -/*' ' 


a s 


s 


P/F 


N(R) 


S. N(R). P/F 


u pV Ji* 1 v'>^ / j^ i 


1M 


M 


P/F 


M 


M 


M 


M.P/F 



^(J^J^JS^.ISJO 



( 7 Jl <>• ) ( JL-j^l ) ilJl X* SJhdl fS, N(S) 
. ( 7 Jl <y ) jUu-*yi JUp JJbdl ^ ■, N (R) 
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. y.!AJ ( v_JU Syo ) «Palling» o P / F 
. ^Ij^JJ ( JL.j'W il^ ) ilf & 

JfcJW gyij^.1 pijdl - 6.3.2.4 
Xe i-Jbi-.Nl ii^Jlj JL-jNI aJI> H.D.L.C ^ -^ oUlj^fl J^jluJ 
iJj-s^io Jp ik_* J5 Ja»L^ . Alii— oj fifj^' **&}* {J*~^ ^ij" c "^ «^'J- J ^- 
■j* >Jp ilh* c aJjVI ik>«-«JJ . jJLiaj>j JL*>» Li* JS" t R jLiu-J iJj>*i«j S JL-jJ 

• ' fry u* r^ 1 J^jI - 
N(S) = Sj S = S + 1 (modulo 8) Jx^-J 

. iL^Jj JL-j^l SjIpN jUJL. Jio-J 

f o 

• S jl I ^5 ,y ,*-L- JUj1> 
N(R) = R^-1 
. ( F.C.S tki jjJb ) £)U> I fjj -y j»_L. <JLai-.l „ 
■Ji-lu J^fl "tyj (JW' ^JIpj R = R + 1 (Modul 8) J*>-1 ft (S) = R I i\ 

. JajJJ oJjaJI 

.NCRj^-Jif^J-jiljJUlj^. 
^1 Jp Jj; R iJ^Jii l^ i s iij^. ik-lj, l<bL. Jikt J5 ^ij 1 jUl; j 
JS J •*>- R il^dl «JU . ( iJlxll aWI J JU^l jltej L, ) JUI (JUU N (S) 
I /^Ul jjj S J I ^ ,y jJU N (R) sLi\j, UUjb £~-dl "(Jul 0* JUu-1 
J_p L-U p^, ijjUil .1^1 . ^y-Vl a^JLI ik-l^ iL^Ll N (R) -j* Jit ^ 
JS^; Ul cilia, t S' ^ jJL a^-ljj R pjjjl ji ^LJl jJUl JUjI blpl i_Jt 

. Ujju U«ijll l^LJl f-*^ ^j~* Wj Jjj** 
jljsLl J* Jit, 6.3.2.5 
H.L.D.C. .1^1 J jlji.1 Jp & J«u 10 jCdl 
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J»5i VjVI ii^JLI i^\ y oU>JJ JL,j1 
^f,, SNRM.P, , I.O .O , 1,1,0 .r,2,Q,P. , 1,3,0 

V^Bi I UAF , .RR.3.F. 



J*i» i^UJl *W| Ak-lj, oLyUl JUjI 
;l t l. .SNRM.P, .RR.O.P, RR 3 



hi&Y ■ UA - F ■ . 1,0,0 . I.1.Q . I.2.Q , I.3.Q .I.4.Q.F , 

<M .SNRM.P. .I,O.O.P. I.1.Q , I.2.Q 1.3,1 , 1,4,2 _, 1, 2, 2 

p. t 

Erfeur de transmission frames rctransmisc 

ci^U ■ UA ' F . . I.O.I ■ I. 1,2 . REJ.2 l,X2 . . 

Demande de retransmission 

( II.D.L.C *lj>-Vl ^ ) full-duplex 4 iiUll JA-^JI 4 jl^Ll J* Jli. _ 19 JSL. 



jUe^M SjaU- ^ <k>J.l 6f Jp Jjb . Receive Ready ' RR. N(R) S *y 

N (R) ^^ }.%J\ y,^ £*^ . r ^j ^ i^ui 

1 £>• »>• (l^ 1 £«*+ JL-j^ll SiLcJ vJJs . Reject REJ, N(R) 

N (R) = < fijy ^Vl ti^JLI ik^ 4L.JLI 

£-<y J Motlc c^jj^l £*» ■ Set Normal Response SNRM u f- v 

(^-*j- j0 -£* JL-^^l V^ Unnumbered Acknowledge UA 



sjuJI U^WI ols^i „ 7 

J ^y olSLilJ i- — Ull oLfcJI of Jb &% . [& y £\j\ v* L,jj i-Jl^x,^ 
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i*^i J&i Jp 3k~Jl olCJJl „ 7.1 

.(20jSLi)is>JloljoVl 

isbjj &*j *I^V UJI oybll olSLi UIp jsiiu-J . ^ ik-j^ ^ VU.cl-1 
*H 2400 ) ^j> ^ Lf jjf isU ^ jl^i ^ ^y, ^^j, . ^, ^ 
<J j^J WiUJl jQj ( L^a iJUJl J C 30 Jl ^ f < ^ 300 d>Lu tf> Jl^c-V 




,'<-*! jAlj J>jk>. 



Z3— &J-0 



\SjPj* i-*->U- 








1 


T 




T 
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,y> oJLaj . t^—U-L JUaj^l «US gjt (^JUI cijJI J "il| jjSLjjiJl JajU JL-S /Up 

.."&*«. Time-Sharing J oliJaiU JiLl iJU-l 

jij^f O ■)& LaJiP jf t iil£ SJjuiJl J**e»jlll oJU C.jlS' lij V[ jjJ "if IJLftj . J?kj~J> 

iAfJl (j •j£»ll ,yij . SJIS' j£> JJjlII iSLilt iupjj oils' .li} t JJ-I IJU» J[ SjjaIJ 

J5>jja>-I /j* Jal ,j*ij c oy>-U«u> Js [Ja>- jj_j i iaJ 200 /^ <LSljjJj O^L/»j JUxI»-<| 

. SJjilbJI 

i*^ IzSKa a£-* . 7.2 

• * 

jl_i»[ -jp 7T Jj^"' ^' * 4-*»«j i aIi^-j SSLiJ ijiji^r' r-?*jrh t s p * Jt *«i b* 1 ^ 

. ( 21 JSCi ) SjJUij. k^> ^JC ,jJl i-SjJl JUx^-1 JviiVl jj*i t i«kAI 

olj-Sjll ^^aw "a>J -jSClj i ilsu-j i*>J aJU-I j [S \4~J6 ij* Jjjtidl i^jy 

o JK S' AP^ Sj?-t*-» c oil J»jin>- 4law»ljj olj_Sjlb tSj^A' V---U-I -laJji 
JaijI t ( a^ jJL? 84 ^ c/SlU-l ,j^u J J-*I J»j 4 ij_, 4800 Jl 1200 ^ ) 
4iLJl S^aA3I J Ubfj ^b ifcJi JblLy ik-ljj oI^JlI. l^-sr Ujai\ oljjVl 

i a]x-«JI JSwiJJ iLwJU 



a~*j3 illiA C)j5o LaJlip pjJl li* j-* UIp <y> 1 LJ/ J t olS'ytJl olSLi 
Jb>; Of lJ~r ,jSUil ,y . JjJdl A*^ ^-j^ 1 £t*H $ o* £Z *qs* ^ • i^J 
p- j^JLIj i_^U-l Oil iU-jl t Ljj jf J jijij Ubdtl oLVjJl J 4-UJJ Cu 

iJLo J^ Of tS>U a** ^Cr^ 1 ,jL ^ ^• l5: r iJ, i>j& Uxp • MARK III ijUJl 

js-j-ii <> pjs ik-iji ^ ^»i v-uu y>Ji sbVi-st-iji yji 

jf iU^»U JS J oljiji sop jf ji^Ij dt» iJjJJl i5j^3l olSLiJI aJU ^ . vj^" 

^ik lilli, c Cleveland J Aj>-jil tj^.U-1 ^ v^- ^^ *^£ 5 ' A:> ^■ , ^-^ 
,y JS 0LCL LilfJI Jj . «j>Jl ^Jix, c ^-^f ^ J *• .^>l j-^i 1 
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|L»>;l^ JTamiari| |Tn«in«lj |Tenmnal| | Terminal | JTemiiMlj | Terminal | 



I 



8 Q 



13 I»] 

Ljgncs tfltannlikvw UgncMatpboniqara 




QQQQ 



i«*2 gy j. fcOa» SLi.21 JO 



TRANSPAC 3C4I ^ JU* . i^l K«tJl - 7.3 
«— > ^Jl^ * oLUll JUjV i.U «Ll ^ TRANSPAC iiLMl 
oL-U fc^ ik.1^ iujH fjj j| jjjij j^ ^ t p T Uji ^ j,^, 

*(EquipementtenninauxdetraitBment,jjdl u« • Vjj *Ci laj O^SCii 72 Kb 
M-jll . tfjill J>U ^ ^Jj ^ jj u>ll ^J* <fc donatio) E.T.T.D 
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TRANSPAC a*. JsljS ^ JJlj Jj JJI ,££-11 J 5jiUllj| . JjJLJI J Ll£l Ijja 

. ( I X? ) DATAPAC jf ( lS>f ) TELENENT c EURONET ^ujjjVl 

TRANSPAC ^LJ ^i^*Jl JjSjSj jJl _ 7.3.1 
J* f j^JI JjL- . jli ^ ETTD J-^ji ^ TRANSPAC aSLiJI Jl ^Ul 
JiWU jsJ -jSUll {y. . CCITT t>JJ X 25 JjS^j^JI tSji— <j ^-*U*jll oJU* 

. a\w»jJI oJLa «jIj[ (J obyLuu* 

*-&r\j2j\ (J J>j~*- *-~ju i_s««l>- iLfij *h-*\ji JJL-1' £■* ETTD 1 )-^>j-j 

. CCITT a^-JU V 25 jf V 24 i^UVl ^ JsljS ^^Ujil . il,l£u 

* lull! fj jMWi l 

o ,JuJl ) HDLC f-jj {j* A-JLd ,yi oU^JLm *~Jill ,_,* UL»j1 t_)_jliJ,l v)jJI 
j_* (Lignc Access procedure) LAP jf JjuIIj ETTD Cxh. cbLJl *l/rl . ( 6.3 
ikJjj iJ^adl e\L>-*$S i_ili3] ilbb t ^U JSLSjj . j|>u HDLC £y ja Aj>\ 
i^-Juj lJLi>u_^Vl t-\jr*&\ • J**"** prJ^ f^*^ f^** aIuJjj *j jjj *j 16 i_j FCS 
Jjji I* t CJ%*y SJl* Jp oljiVlj ETTD ,j<j JiLJl Sjblj »m~« i t -kjlaiU iJbo. 

£. i&odl^p. Cilj^bU v-Jb i£c <y» SJlS^II i X 25 jUll Aa^ J . OUVl ^ 

i^Jl cSjJUwt J 4*uljdl icJLAll oUlj*-^! t i5jiJ.I l«i» J i JUjcu-V HDLC 

. jJl ( TMM <, BCC Ji. ECMA 24 jf i V-UVl "&~A £ l JUu ) 

(Circuit CV jf Aj^lj»^!l »J ljtJl f ■rt*' j* ^-L-Vl p^ill t i5jX«U IJla J 

. iSLiJl J^U- ,y ETTD tjulif tju pjJl jL- **?-jJ jL*. ^J ^lj t Virtuel) 

jf t ^Jiyi v-^ j>4 jf Ji-v 11 ^i ^ ist ' (cvc) jL- o! o<s ie*\j*i\ sjUJi 

. i^li-1 aL^jJ! ttj>. c (CVP) !*S1a 

OjSu Of ,j£c a>U- (5^1 oljifj ETTD ^ uy ^J^-* CV oljb SJIp 

. Jt>iLl iJUi. yL viAJi J-Lo . TRANSPAC iUc^Jl ^ Ja _^*r ^ r 

<i • ^j^i t> ^^'j NVL J^ 1 ■^ 1 i^j ^^'^ -kM 1 c - ifc * *"*V r*- - 
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ABONNE A 


Niveau Paquet 


*"jj" t5j~-* 












i)l>* 




AiJjiill 


Niveau Trame 


l^^'i^J*—* 














Niveau Physique 


•*^ — 


















v m 








^J* 


MODEM 


















i 


F 






Adrcssc 




/ 


C 






\ 


I 




|NVL 
En-tele 


u- 


< 




Donnccs 


ol 






FCS 












F 


















F?r 


MODEM 


























uJL> 


COMMUTATEUR. - 


* 






« 











ABONNE B 




A BONN E C 
TRANSPAC Jal^i 22JSL1 



Ijll^ 



pJji £*~i Uuf b* . JL-jill ^ Ik. Jvlb^i £. CV J> J* oU^Ul f ;_, Jlai . 
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CVP oljloJl £-#. *\j*[, CVC oljUJl £# j,j£ Jl &$ « sajl*. » <*jj\ _ 

V*i>rrt)i fc^l j yji _ 7.3.2 

J ^ iiLUb LijkJ I ol>>Vl fcL* fclj* . HDLC J* j&jll X 25 ^i>»JI 
s >i - Cf Jl *»M ■ fj^Jl «r~ - £* - ^Uji-jf «PAD» ik-lj, JjlJLI ^ji— 

Vl^J ^tfl; C*-"* ii 51 ^J^ 1 5| ^ 1 Cf j!^ 1 Jl- 3 * PAD g'M « fj^ 1 J d«-Ji 
•A* £-*■ cJ^jS (X 29, X 28, X 3) CCTIT ■>. oLi^l ,>« . CV IjIjJI 
c ?Jjd» i/SLiJl ik-l^ Jill J} ^j Dli-i-ljlSJl v>ll 51**1 «j^ - fU 11 

. i^»l>- AJUoj 5k-.ljj U5£» jf jj-SUslI 

«^iJlwiyu-_ 7.3.3 
i|ja£, c iljUUiJ jl>JLl ^^Jl jp Jiu*.^ TRANSPAC aSLLJI v-^o" . 

oLJa*ll pj>o- *_—»- i^U- «yu».fj>lJl *P>-» J-i»=i tSjfr" ^J^l J* ^*^ 

. &->! 

C MACCHI, J. F. GUILBBRT, TMinfomatique; transport et traite- 
ment de r Information dans les riseaux et systentes tiiiinformatiques, 
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M. ELIE, H. ZIMMERMANN, Une approche systcmatique des proto- 
cols sur un reseau d'ordinateurs, Congres AFCETde 1973. (Docu- 
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Logiciel — Software p^^ 

iejAjt JJcid v-bll t JJttjJl %*2£j t J&\y)\j cjLU*JU £*U" **y**- 

Materiel — Handware jUp 

oUmll ii-U- J iJLjcJil A-Jlijsiil y^^jJI **-j*f 
' Memoire i^\i 

Memoire de masse ^S* *>«>«j j>- SjS'li 

Memoire masse — Read only memory ottSjS'li t i^»5 J S'li 

(rom) ^ui jucVi j i^j*-^. jjju; ^ *y S/l j 

Memoire vive, ibS" _ s*lji 5^1 i t 4_J>- S^S"! j 

(RAM) (pUJl JLwcu-'bll J l^jA-si. ^JjJUJ ^SLc o^li 
Microprocesseur jy~*jj>j£?* * iS./ 1 -' p|^ 

. SJ?-lj 4*L»l5u ijb J <Uy*J? (y^Lp f-^ <^~>- i jw-^> pJLuj* 

Mode dialogue iJ^liiJii^ 

. j»lkJlj J**lJj tjo jljJ-L «*^I oLk«il iJL-U* j AAijia 

Multiprogrammation iilo. if^ 

. J>-lj cij J «*ljj SOp .Li£j «^J JajJI J JLxSJ 
Multitraitement ^j^, ^U, 

Numerique— numeric :; 

V>Ji Mij^ll oU£l jf oLJUl Jjir ^, ysj c ^ ^ Jp " 
iLU- f Ui! j. vijll oUjlJll gjL t^JUl f lkJl . f Bjf ^ jjU 4 oU 

Partagede temps— timesharing oJJl ^u-J 

J ilfc~. JLpf jj* ^ jjU., sju> y^i^ .^.y.1 ^ J^^J i^- 

. <ul»U£ JaP ii^yff 

Photo style— lightpen » • i- 

. vlUl Jp s^su^jli IjdLw.Iji ^ t JU^l 51^ 
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PartabilitS , .. 

Processeur ti 

. <_w.U-l ,> i^ iiJ J i^£ ^ jj-, ^^ ^j ( j^ji i s , Jd ^._ v 
Bi-,Tri-,multiprocesseur " Si JUi. oULUi 

M- 1 OiUcu^ sop a^\jj JLwc«,^U sjuxJlI ^.IjJI -j* iaj^j JUL? ipj^ 
Robotiquc 

Dcsecours sl»*dJ 

Scrvcur _iis t u^. 

Systcme Sexploitation JJutdl -Ifc 

. ^V-Ni., JUrti oLUp sjbL> J~Ji li ^Vi .Jl* ^ i JJjV i 

Tcleinformatiquc ^ y^ 

. JOj^Jl JU;*bll olO Jwc-j ^U^JU* flliJ ^-U/jf jyacu-1 
Telematique " jj^ ^^ 

Tclctraitcment * sa ^ U-U, 

V> ^IjJ ^l* ol^Ul JUu-Jj JUjI 1^1* jrf U-Ull J ib> 

. t,_-*»U-l /jp SJUdJ 

Tclctraitcment par lots i^wuLIj SJLao U-U. 

jf Ul^J VJ JUI ^I^JU ^^ai-Lj ^ J_p gjj. J\ SJL.JI JJLbJil 
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Temps reel — reel time Jj«icjj 

Terminal ii^i. sbf 

• "^s*i ij* J~V** (""** f'J^i'. T"*--^ J^i-l" 
Tirage — fas-sin ipjjx. iii*«J 

Traitement automatique des donnees oLk**JJ i-SCJl^jf it-U* 

4 Js*^ * ^s*^ v*^ ' ^nL^jJjf iaSLwjj 4-jjU-I cjLJUjJI «j-»jf 

Traitementparlots .j^s-J-l iLU, 

. ( iius ) ^ sbf j* u-uii £iuji its 



Visu, Visuel — display 
Visualiser — to display 
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5 olyUI iJijf - JjVl Jvaill 

5 ' olyJUil |.U* - 1 

5 oLyUl fl& fl*. - 1 - 1 

8 olyUl ^ UiJ i£ - 1 - 3 

9 i^Ujk. f UiJ 5JVI ii-Ull - 2 

9 f l^ll -2-1 

10 oLSjdlj ^Jl - 2 - 2 

15 ol^JWl J-tf - Jlill J-*iJl 

15 ^jxJl iM\ - 1 

15 ySWl fcf/11 - 1 - 1 

16 . ^y-^l iJi;Vl - 1 - 2 

17 . . . . : 2 Jl (vUl - 2 

18 l^)\ oLlaJil - 3 

18 ^aJULl ybiJl UJ^I oLLdl -3-1 

18 aSj>Ca U^l* JjUJl - 3 - 2 

21 : £,^11 ^y^Jl - 3 - 3 

21 ...;.■ ,Ji&| 45^1 - 3 - 4 

21 ■ oU-Jl Jmi^Li f-^J {j* oQuw - 4 

22 g*Ull ^p-%,** J JJJH - 5 

25 c/jUJl > ctJWl J^ill 

25 u^i o^ujij yijjjiJi o^u^ji - 1 

25 ■ ji>fl-2 

25 • ^JjyJj* Slkj - 2 - 1 

26 S^Ul ^¥1-2-2 

27 VsWall u^lyVl - 2 - 3 

29 (5^1^-2-5 
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30 o^^Jl p-kJ - 3 

30 ( o^U^dlj J-CJI ) oljJUUl - 3 - 1 

31 Jbll pJidl-3-2 

31 jty Jt=- ^kl - 3 - 3 

32 yill pJidl - 3 - 4 

33 tSj^Vl p^kJl oLLp - 3 - 5 

33 o^U-JI Us* - 4 

33 jyU-fciJI UJ-I - 4 - 1 

34 . . Ukll iUi-l - 4-2 

34 ••• JJuidl^b-4-3 

37 ^y*JW 4* -C 1 ^ 1 J"^ 1 

37 ^li/"" - 1 

37 c/A^Jl ol^f - 1 - 1 

38 oU*ll ^ - 1 - 2 

39 • • ■' oUUli £.U «jbl JLkf - 1 - 3 

39 oLLdl d* - 1 - 4 

4°. y£*-*S3l oU«il c^Jl f Ull p-kdl -2 

40 ^1^1 flfc 4 oLUll ^ ^Jy -2- 1 

40 , oUjl £*JL i.Ul JLS>)| - 2 - 2 

40 ^Uudl £*# Sjbl iJilf Jp ili.1 - 2 - 3 

47 iiUaVl oU*U iJ* - 3 

48 ioUrfl oy»*. lib j^k; - 3 - 1 

51 ^ .ILi-lj »LSJI -3- 2 

53 JLwU-^I - 3 - 3 . 

55 & Jb- j^*U. - 4 

55 U!%JI oUwll ^U - 4 - 1 

55 V«WI fcAII JUxu-l -4-2 

56 oUjUIj oLLdl ilyj - 5 

59 1*J\ oW -^-.UM JmmJI 

60 OIjJjjS-1 

61 <W-2 

64 viJLjb - 3 
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65 ....... JUjcu-VI ixull cMM\ - 4 

66 bffcJ-5 

69 Olyjy-^-sUl JvaiJl 

69 fctUJ £j>\jA - 1 

76 oUJUdl US - 2 

77 ^.UjJJ i.Ul i^jdl - 3 

77 : JjUI oU-Lu - 4 

78 ijjLl oULJI - 5 

83 , JLJkll oULJl - 6 

85 . . , , g.UjJl JLfcj aij^Jb j^JI - 7 

88 ..... gAj\ oUU- - 8 

89 gJjsM - JUd - 9 

98 i hjM\ g.l^l-10 

101 j,\Ji\ - 11 

102 fcJJl olv-y - 12 

105 JjjjS" _ fi Ul J^l 

105 . . . ". . . . WJI £*\ r - 1 

108 Jjy* ibSGl oply - 2 

109 Jjy* iiL g-UjJU JUUJI ^SjxJl - 3 

iii jJsJl-4 

HI U.JI ijS^Jl - 5 

113 • • • libpi-A 

12° ol>Ul f-J -7 

132 djy* **L jjii\ - 8 

133 •". r t^liJI g.1^1 - 9 

137 . . . . JU fcJ -.yWl J^uJl 

137 ^W** - J 

151 -. oLkJil ^S>- - 2 

155 ^Idl - 3 

160 ■ ■ ; giUjJl U\y. t jidl -4 

165 £l>-l JU-il - 5 

175 • • oWWtfl "Sjlal - 6 
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178 ■ d.l^l-7 

180 ; . . S/IJUU ^L. ^JkJj Jjbl - 8 

185 Vili jL 5i] - £-fcll J*wll 

1S5 ■ aui ^1^. - 1 

189 oLJUdl it* - 2 

190 lWJI JuJLu - 3 

191 ; '. i^JLl ^Ul - 4 

192 ijik, juUJ - 5 

193 ^.l^l oljjJU p^-Jl ~6 

1% '. . . , gjjjM jUii - 7 

199 . J^| -JLI Ja oLLJI - 8 

203 SjUaJI ijU^Ul .^iUll JsaiJl 

203 iJbyS - 1 

204 JU/ill ot~2I - 2 

210 oU«il JL-jl ot^2J -3 

214 Sju^JI oUyUll JaU - 4 

221 U>JI olj^l - 5 

222 J,^kL| jjbl oW^I - 6 

228 5JU*J| vm*W olSLi - 7 

235 olfcJU 

236 &L obSUJJ EBCDIC,- ASCII ^ - f 

240 oUSlI tibiJL oUJU J>-Ijl1I JLyScJl Jjlji*- _ i~» 

244 64 JiOo-2 SjJ - *■ 

245 SJUjUU *UI -j 
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^U53HJLa 

jL^I iSjt -liJj : jUjJUll l^ f .xlwu ^Jl vjs" *JUJI ^iljll t-jkiJl IJla «JUj 
SJOJUJI jt i^liJl J5ULI -j* ibco^l £• «. SOIU jtfflj ^Uxu-l Jl^ll ^Ijllj ^LJI 

^Ip JSwi j t cj"5Lhl-JJ ij-Jlj i--LiVl ~*\A\ ^jJJCj jUj ,5^- lilli Jbuj 4 oLtwllj 

. oLk-dl iijs ^ jl\ JUL' 

iu jVb jJLo.^L.Ijk-J Jbr^ JUU . a^JL J_Ldl y» iJL.jJUil J J«JI jv-JiJl 
l^jl,^ . BASIC t PI./ l.tX)H()I.,l-X)RTRAN4.77 : ^j "JUjO-I JtfVl oUJ 
iJi;Sl i^-jJli e^jtJl ^-AJ i aJUjClJlI k£i\ -Lp-jj J-l«-S l^V Ul>- (assembler) Jj}ll **l 
*j av»1>- ik»J jlJUolj (^*-^» J£ pi il^»- »UiJU jj^l*- J** jlpI— < |>^L> b> : J^V-idl 

OUiJI pJUj U. "jLvoi U*£UO>- lHJJL) l Ijj/J £*~rf»l SXaJI AjjlrfjLJ.1 _>jk; 01 Uj . oJ^-J 

. IjJ *JL»j«iwJll 
JLi. y> \S 1 ^LjU^UII ^—.Ijj j O^'j-J' « r , '5^iJI /ij*Jr lJUi. <_jU£JI IJLa ^ 

0>» CjUjLJlI JA "OjJj^ Li frjL Jp ^-IaL-j vi~>- Jii-I IJA j jSAni\ (jj-^Loi-^AJ 

. iJU^Ull J U** U*l~» ^ I JJ t ^-Ijllj t-^ 1 J ki ^ 1 <J1 ^r 1 ^ 1 
Jjb- ^ iUxL-J.1 i-JLJl oL»JUkdili ^-^l* J*- v^L^Jl IAa ^j^ il^Jl Jj 
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